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- FOREWORD - 

I 
This handbook started out as a collection of lectures prepared ^ ! 
as "fill-routines" by the author v;hile on the "tour circuit 
promoting his new book, "The Gunnplexer Cookbook - A 10 GHz . j 
Microwave Primer." It is a rather long jump (at least in ' ; 
frequency and wave-length) from the 1.77 MHz clock of the 
TRS-80 to the 10250 ^DIz band where the Gunnplexer operates, 
but surprisingly the microwave buff and computer buff have I 

more in common than m.eets the eye; i.e., a need to communicate ' 

whether it be by simple fm voice modulation or ASCII digital 
data link. 

It was both gratifying and surprising to find that microwave 
radio amateurs had as much interest in TRS-80 assembly 
language programing as did computer hobbyists in setting up 
low-cost microwave digital data links. Ours is indeed a very 
small world with most all things interrelated. 

This handbook is NOT for the beginning assembly language ' 

programnier who should certainly learn the fundamentals of the 

art before attempting to use the shortcuts and "tight code" j 

programming made possible by using the myriad excellent Level 1 

II ROM subroutines presented. The moderately experienced 

assembly language programjner who understands the difference ■ 

between his/her JPs and JRs , SETs and RESets, and BITs and I 

bytes will find that utilizing Level II ROM subroutines opens 

up an entirely new vista to the wonderful world of assembly 

language programming. Many dull but dem.anding rote subroutines j 

may now be accomplished often with a single CALL compared with ' 

previous multi-line/multi-page prograiiiming that had to be 

entered a line at a tin.e. Programmers arise. Cast off the i 

yoke of ignorance and START HAVING FUN writing assembly \ 

language programs that run 300+ times faster than BASIC in 

less than 1/10th memory. VJith practice, you (and the author) 

will soon be writing assembly language programs as quickly and 

with as little effort as those written in BASIC, Fortran, 

Cobol, or Pascal. ^ 

ACKNOWLEDGMENTS : 

Without the generous aid and assistance of both Nancy A. 

Courtney and Margaret C. Merz this handbook would have never I 

come to pass. Their encouragement, hard work, and persistent } 

insistence that we keep at it are gratefully appreciated. 

ADDITIONAL THA14K YOUS : to the late Charles Tandy for his 

courage and investment in making the TRS-80 a happening; to 

Miunford Micro for a 3 speed clock; to Western I/O for an IBM 

Selectric printer that never quits; to Apparat for NEV7D0S+, to | 

Shrayer for Electric Pencil; to Microsoft for the world's most i 

extensively used BASIC; and lastly to Radio Shack, who inspite 

of^., other short comings build the WORLD'S MOST COST EFFECTIVE 

MICROCOf-tPUTER. Thank you each and every one. j 
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- INTRODUCTION ~ 



Disassembled machine code of any variety WITHOUT comments is 
worth about as much as a TRS-80 without electric _ power. 
Constants, address table entry points, and data lists are 
translated into utter meaningless/misleading garbage by the 
disassembler program. Disassembled Level II ROM prints out EX 
AF,AF' from memory locations 00 5AH, 14 79H, 1619H, 1 8BAH , 
18BCH, etc., etc., when in actuality none of the alternate 
register pairs are ever used in this ROM's BASIC program. 

Decoding and making any sense out of any object code program 
is impossible if one does not at least have a clue to the 
program's intended function. Fortunately we know exactly what 
Level II ROM's functions and capabilities are, so what 
appeared to be an imoossible decoding problem is reduced to 
only an extremely difficult one. So difficult in fact, that 
even Radio Shack's computer division in Fort Worth, Texas does 
not fully understand. this excellent "Tight Code" written by 
Microsoft's Paul Allen and Bill Gates. TUi exam.ple that proves 
this point is the Radio Shack book, "TRS-80 Assembly Language 
Programming," ^62-2005, that was introduced mid-year 19 79 has 
virtually no references to Level II ROM subroutines of any 
variety. This is incredible and truly theater of the absurd. 
It is either criminal negligence on Radio Shack's part, or 
just plain stupidity. Always hoping for the best, we shall 
presume the latter. 

The level of difficulty in decoding the TRS-80 ROM may be 
measured bv the fact that after 2 years of worldwide use by 
over 200,000 computer buffs ranging from beginners to advanced 
programraers with years of experience, the Level II ROM entry 
points for virtually ALL the BASIC functions and related 
subroutines have never been oublished with comments, or 
disclosed by anyone, anywhere, EXCEPT to a very limited 
audience by a genius named Andrew Hildebrand, located m the 
southwestern wilderness of the US. 

This handbook is dedicated to Mr. Hildebrand' s genius, to his 
persistence in unraveling a very tangled web, and to him 
personally for this very considerable accom;Olishment . The 
author's only contribution is this handbook which will 
hopefully remove the shroud of mystery from a previous "black 
hole" by attempting to make the subject understandable to 
hobbyists, high school and college students, and even computer 
science professors, many of whom do not have the slightest 
idea of how to efficiently utilize the myriad Level II ROM 
subroutines in TP^-80 assembly language programming. This 
handbook will also assist users in decoding the majority of 
ROM subroutines in ALL Microsoft BASIC'S including those used 
by Apple, Pet, KIM, Heathkit, et al microcomputer systems. 

Each section of this handbook is hopefully self-explanatory. 
The Level II ROM hex code presented in Chapter 6, though very 
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lengthy, is included as a necessary reference. The self-test 
questions & answers in Chapters 9 & 10 allow you to check your 
progress after each Chapter, The limited first edition of this 
handbook was bound and glued with a cloth backing^, but even so 
would not stay together under repeated usage, As'^ such, this 
second edition is being delivered in loose leaf binder format. 

SUMl-lARY: 

Chapter 1 illustrates how the majority of the ROM functions' 
CALL locations are decoded. 

Chapter 2 includes three source/object code programs and text 
illustrating the use of simple ROM "+-*/" integer, single 
precision, and double precision arithmetic subroutines. 

Chapter 3 describes how to use the trigonometric, exponent, 
log, CINT, CSNG, CDBL, et al , functions in concert with the 
RA!-5 accum.ulator and CDBL store, plus a demonstration program. 

Chapter 4 covers a number of the more useful and important 
Level II ROM ancillary subroutines; Chapter 5 is a summary of 
virtually all BASIC function CALL addresses. 

Chapter 6 is the PARTIAL Level II ROM code in hexadecimal. 

Chapter 7 presents and explains an extremely useful number 
conversion program that is virtually a must for the serious 
assembly language programmer working with the TRS-80, It is 
written in BASIC for comprehension/modification and covers: 

- DECIMAL TO BINARY ENTER D 

- BINARY TO DECIMAL ENTER B 

- HEXADECIMAL TO BINARY ENTER HB 

- DECIMAL TO HAXADECIMAi ENTER DH 
" HEXADECIMAL TO DECIMAL ENTER HD 
~ SPLIT TRS-80 TO DECIMiAL ENTER SP 

- DECIMiAL TO SPLIT HEyj\DECIMAL ENTER DS 

- SPLIT HEXADECIl'LAL TO DECIMAL ENTER SD 

The first 5 conversions are obvious ones. The 6th, SPLIT 
TRS-80 TO DECIM-AL, is unique in that it takes decimal values 
displayed via the TRS~8 PEEK conmand from 2 adjacent memory 
locations (two INPUTS required) , then converts them to hex, 
reverses the 2 hex numbers as the Z-80 stores LSD first and 
MSB second, then converts the 4 digit hex number to decimal, 
and displays it on video. This conversion is a real time saver 
when extracting addresses (0 to 65535) from ROM or RAM, 

Chapter 8 is a useful print all zeros with a slash program. 

Chapter 9 includes self- test questions for Chapters 1-8, 

Chapter 10 is a bibliography and answers to the self-test, 

^„._3„,.- ... -.• ,-.K:,^---!c,-^n -.Tanuar^/ 1980 



' 
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- CHAPTER 1 - 
DECODING LEVEL II ROM FUl^CTION CALL LOCATIONS 



V 



INTRODUCTION: 

During the past two years, the Level II BASIC written by 
Microsoft originally for the TRS-8 has become the world 
standard de facto BASIC used by virtually every significant 
microcomputer manufacturer. As of January 1980, the number of 
microcomputers delivered to end users with Level II or modest 
variations of Level II BASIC is estimated to exceed 300,000 
plus. With the number of BASICS in the marketplace counted in 
tlie dozens including: Hewlett-Packard BASIC, General Electric 
BASIC, and even monolithic IBM's "VS BASIC," there must be a 
nur.iber of good reasons for the near universal adoption of 
Microsoft's BASIC. 

1, It is cheap? Answer: no, in actuality the license to use 
this BASIC is incredibly expensive. Heathkit does not charge 
hobbyists $100, a copy just for the program for fun and games. 

2, Is it efficient? Answer: you bet it is. Previous BASICS 
the author has studied required 22K to 32K memory to minimally 
perform the same fuctions, if indeed as many. 

3, It is cost-effective? Answer: even at the high licensing 
price it is VERY cost-effective when one considers the trade- 
offs between available program memory remaining with the 
inherent 6 4K maximum imposed by most all 8 bit microprocessors 
of the current generation. Some of the other BASICS mentioned 
above only leave the user about 18K of useful RAM when a disk 
operating system and extended disk BASIC program is ad&d. 
This is ridiculous in a 64K MEM system. 

Let's now take a look at the prodigious functions and their 
CALL locations in this marvel of "ticjit code" progra^mming 
written by Paul Allen and Bill Gates. W doubt if there vras 
any intentioial encrypting involved when the program was 
written as encryption takes memory and memory costs money 
either directly or indirectly as pointed out above. The main 
reason it has been difficult to decode tlie Level II ROM was 
brought about primarily by its compactness? i.e., nothing 
wasted, nothing unused, and no easily deciphered pointers 
telling the code breaker, "here I am, use me.'' 

LEVEL II ROM FUNCTION NAME LOCATIONS: 

Are the easiest to find of all. Only a retarded 3rd grader 
would overlook them at memory locations 5 7 12 through 6172, 
Figure 1 is an excruciatingly s,im>ple BASIC program that will 
display these names and their location on video for you. The 
first letter of each name's MSB is masked by subtracting 12 8 
to obtain its ASCII equivalent. Figure 2 is a print out^ of 
this program, R2mei±>er, the numbers are "the name's location, 
NOT the CA_LL location. 
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"— "~"~ ^ — — - - LEVEL II HOM 

^^n-rn ■PTr>imONS NAME blbi xt-' ■" 
10 ■ MICROSOFT BASIC Fir.CTluw^ 

''^ ^r.v, r:-7l9T06175'Y=PEEK(N) :IFY>127THEN. - 1 

fs S;i'fF;lE;(z?>127mENPRl.ITCHR?(Y)." -;.LSEGOiq35 

30 PRINTM,:GOTO4 

35 PRINTCHR$ (Y) J 

40 NEXT Figure 1 



END = 5712 
CLS = 5726 
DATA = 57 42 
LET = 57 5 8 
RESTORE = 5770 
STOP = 5791 
DEFSTR = 5808 
LINE =5832 
OUT =5851 
GET = 5865 
MERGE = 5 880 
RSET = 5897 
DEF = 5917 
LIST = 5933 
CLEAR = 59 52 
TAB( = 5970 
VARPTR = 59 8 3 
STRING$ = 59 9i 
MEM = 6020 
STEP = 6036 
/ = 6043 
> = 6050 
INT = 6 56 
POS = 6068 
EXP = 6080 
ATN = 6 9 2 
CVD = 610 5 
MKI$ = 6117 
CSNG = 6133 
STR$ = 6147 
LEFT$ = 6161 



FOR = 5715 
cm = 5729 
INPUT = 57 46 
GOTO = 5 761 
GOSUB = 5777 
ELSE = 5795 
DEFINT = 5814 
EDIT =5836 
ON = 5854 
PUT = 5868 
NAME = 5 885 
SA\'E = 59 01 
POKE = 5920 
LLIST = 5937 
CLOAD = 59 57 
TO = 597 4 
USR = 5989 
INSTR = 6005 
INKEY$ = 6023 
+ = 6040 
\ = 6044 
= = 6051 
ABS = 6059 
SQR = 6071 
COS = 60 8 3 
PEEK = 6095 
EOF = 610 8 
MKS$ = 6121 
CDBL =6137 
VAL = 6151 
RIGHT? =6166 



RESET = 5718 
RANDOM = 57 32 
DIM = 5751 
RUN =5765 
RETURN = 57 82 
TRON = 579 9 
DEFSNG = 5 820 
ERROR = 5 8 40 
OPEN = 5 8 56 
CLOSE = 5871 
KILL = 5889 
SYSTEM = 5 9 05 
PRINT = 5924 
DELETE = 59 42 
CSAVE = 5962 
FN = 5976 
ERL = 5992 
POINT = 6010 
THEN = 602 9 
_ = 6041 
AND = 604 5 
< = 6052 
FRE = 6062 
RND = 6074 
SIN = 6086 
CVI = 6099 
LOG =6111 
14X0$ = 6125 
FIX = 6141 
ASC = 6154 
MID? = 6172 



SET = 5723 
NEXT = 5738 
READ = 5754 
IF = 5768 
REM = 5788 
TROFF = 5 80 3 
DEFDBL =5826 
RESUME = 58 45 
FIELD = 5860 
LOAD = 5 87 6 
LSET = 5893 
LPRINT = 5911 
CONT = 592 9 
AUTO = 59 4 8 
NEW = 59 6 7 
USING = 59 78 
ERR = 5995 
TI^ffi$ = 6015 
NOT = 6033 
* = 6042 
OR = 6048 
SGN = 6053 
I^p = 60 6 5 
LOG = 6077 
TAN = 6089 
CVS = 6102 
LOF = 6114 
CINT = 6129 
LEN =6144 
CHR$ = 6157 



Figure 2 
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MATCHING BASIC FUl^CTIONS WITH ROM CALL ADDRESSES; 

Now the decoding game becromes sonev;hat more interestingo Not 
difficult yet, because no tricky encipherment was used. Vie , 
should rememier that encoding costs memory and mfemory = money. 
One does not have to search very far in memory for the 
location of each BASIC function's CALL address 

These addresses are split into two groups. The first group 
begins a few bytes after the end of the function name list at 
MEM location 6178 and runs through 6 351. This group covers 
all functions from END through 'less than.' The second group 
begins at MEM location 5640 and runs tlirough 5711. This group 
includes all BASIC functions from SGN through the end of the 
function list, MID$. 

With the exception of those BASIC functions from TAB to 'less 
than,' all CALL locations are stored in MEM using the standard 
Zilog Z-80 format (the genius of Federico Faggin, Z-80 creator 
appears again) , Vrfith the LSB (least significant byte) first, 
and the MSB (most significant byte) second, in the following 
memory location. Figure 3 illustrates a little BASIC program 
that will display the BASIC function, an = sign, then the MiEM 
location of the stored CALL address for this specific function 
and lastly the CALL address in standard TRS-80 "PEEK" format. 



10 ' PROGRAM TO MATCH BASIC FUNCTIONS WITH CALL ADDRESSES 

15 ' 

20 CLS:PRINT"FraCT=ADDRESS LSB-MSB FUNCT=ADDRESS LSB-MSB" 

25 A=6176:FORX=5712T06175:y=PEEK(X) : IFY>1 27THENY=Y" 1 2 8 

30 Z=X+1 :IFPEEK(Z)>127THENPRINTCHR$ (Y) ;" =" ;ELSEGOT045 

35 A=A+2:IFA=6352THENA=5640 

4 PRINTA,PEEK(A) ; "-" ; PEEK (At 1 ) , :GOTO5 

4 5 printchr? (y) ; 
50 next: 

55 END 

- Figure 3 - 

Figure 4 is a printout of Figure 3's program output using 
those addresses whose LSB/MSB are directly translatable to 
CALL addresses. The other functions' CALL addresses are fully 
covered in Chapter 5. Figure 5 is a printout of Level II ROM 
MEM locations 16 00H through 1 8FFH to illustrate how LeveL II 
ROM BASIC function CALL locations are determined. 
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FUl\iCT= ADDRESS 


LSB- 


-MSB 


FUNCT=ADDRESS 


LSB- 


■MSB 


END = 6178 


174 


" 29 


FOR =6180 


161 


- 28 


RESET =-. 6182 


56 - 


■ 1 


SET = 6184 


.53 " 


- 1 


CLS =6186 


201 


„ 1 


CMD = 6188 


115 


- 65 


RANDOM = 6190 


211 


_ 1 


NEXT =6 192 


182 


- 34 


DATA = 6194 


5 - 


31 


INPUT = 6196 


154 


- 33 


DIM = 6198 


8 - 


38 


READ = 6200 


239 


» 33 


LET = 6202 


33 - 


■ 31 


GOTO = 6204 


194 


- 30 


RUN = 6 206 


163 


- 30 


IF = 6 208 


57 - 


- 32 


RESTORE = 6210 


145 


- 29 


GOSUB = 6212 


177 


- 30 


RETUR^J = 6214 


222 


- 30 


REM = 6216 


7 - 


31 


STOP = 6218 


169 


- 29 


ELSE = 6220 


7 - 


31 


TRON = 6 22 2 


247 


- 29 


TROFF = 622 4 


248 


- 29 


DEFSTR =6226 


- 


30 


DEFINT =6228 


3 - 


30 


DEFSNG = 6 2 30 


6 - 


30 


DEFDBL = 6232 


9 - 


30 


LINE = 6 234 


163 


- 65 


EDIT = 62 36 


96 - 


■ 46 


ERROR = 6 2 38 


244 


- 31 


RESUME = 62 40 


175 


- 31 


OUT = 6242 


251 


- 42 


ON = 62 4 4 


108 


- 31 


OPEN = 6246 


121 


- 65 


FIELD = 6248 


124 


- 65 


GET = 6250 


127 


- 65 


PUT = 6252 


130 


" 65 


CLOSE = 6254 


133 


- 65 


LOAD = 6 2 56 


136 


- 65 


MERGE = 6253 


139 


- 65 


NAME = 6 26 


142 


- 65 


KILL = 6262 


145 


- 65 


LSET = 6264 


151 


- 65 


RSET = 6266 


154 


- 65 


SAVE = 6268 


160 


" 65 


SYSTEM = 6270 


178 


" 2 


LPRINT = 6272 


103 


- 32 


DEF = 6274 


91 - 


■ 65 


POKE = 6276 


177 


- 44 


PRINT = 62 7 8 


111 


- 32 


CONT = 6280 


228 


- 29 


LIST = 6282 


46 - 


■ 43 


LLIST = 6284 


41 - 


- 43 


DELETE =62 86 


198 


" 43 


AUTO = 62 88 


8 «■ 


32 


CLEAR = 6 2 90 


122 


- 30 


CLOAD = 6 292 


31 - 


- 44 


CSAVE =6294 


245 


- 43 


NEW = 629 6 


73 - 


- 27 


INT =5642 


55 " 


- 11 


ABS = 564 4 


119 


» 9 


FRE = 564 6 


212 


- 39 


INP = 5648 


239 


■- 42 


POS = 5650 


245 


- 39 


SQR = 5652 


231 


- 19 


RND = 56 54 


201 


- 20 


LOG = 5656 


9 " 


8 


EXP = 56 5 8 


57 - 


■ 20 


COS = 5660 


65 - 


- 21 - 


SIN = 5662 


71 - 


- 21 


TAN = 56 6 4 


168 


- 21 


ATN =5666 


189 


- 21 


PEEK = 566 8 


170 


„ 44 


CVI = 5670 


82 - 


- 65 


CVS = 5672 


88 - 


- 65 


CVD =5674 


94 . 


- 65 


EOF = 5676 


97 « 


- 65 


LOG = 5678 


100 


- 65 


LOF = 5680 


103 


- 65 


MKI$ = 5682 


106 


- 65 


MKS$ = 5684 


109 


- 65 


MKD$ = 5686 


112 


~ 65 


CINT = 5688 


127 


- 10 


CSHG = 56 9 


177 


-10 


CDBL = 56 9 2 


219 


- 10 


FIX = 5694 


38 - 


- 11 


LEN = 5696 


3 - 


42 


STR$ = 5698 


54 - 


- 40 


VAL = 5700 


197 


- 42 


ASC = 5702 


15 - 


- 42 


CHR$ = 5704 


31 - 


- 42 


LEFT$ = 5706 


97 - 


- 42 


RIGHT$ = 5 70 8 


145 


- 42 


MID? = 5710 


154 


- 42 









Figure 4 
Function=Call Address jMEM Location 



Call-Address 
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1600 6CAA AA7F 0000 0081 8A0 9 370B 7709 D427 i » , o , » . . » . 7 . . . . 

1610 EF2A F527 E713 C914 0908 3914 4115 47 1 5 .*.'..,..» 9 .A. G. - 

1620 A815 BD15 AA2C 5241 5841 5E41 6141 6441 » . . » « ,RAXA. A, A. A 

1630 6741 6A41 6D41 7041 7F0A BlOA DBOA 260B , A. A. A, A. .....& . 

1640 032A 3628 C52A 0F2A 1F2A 612A 912A 9A2A , *6 (.*,*.*.*.*. * 

1650 C54E 44C6 4F52 D245 5345 54D3 4554 C34C , ND. OR.ESET.ET. L 

1660 53C3 4D44 D241 4E44 4F4D CE45 5854 C441 S . MD. ANDOM.EXT . A 

1670 5441 C94E 5055 54C4 494D D245 4144 CC45 TA. NPUT . IM. EAD. E 

1680 54C7 4F54 4FD2 554E C946 D245 5354 4F52 T. OTO. UN . F . ESTOR 

1690 45C7 4F53 5542 D245 5455 524E D245 4DD3 E, OSUB. ETUR:^ . EM, 

16A0 544F 50C5 4C53 45D4 524F 4ED4 524F 4646 TOP .LSE . RON . ROFF 

16B0 C445 4653 5452 C445 4649 4E54 C445 4653 , EFSTR. EFINT. EFS 

16C0 4E47 C445 4644 424C CC49 4E45 C544 4954 NG. EFDBL. INE . DIT 

16D0 C552 524F 52D2 4553 554D 45CF 5554 CF4E . RROR.ESU.ME . UT ,N 

16E0 CF50 454E C649 454C 44C7 4554 D055 54C3 . PEN, lELD. ET . UT . 

16F0 4C4F 5345 CC4F 4144 CD45 5247 45CE 414D LOSE. OAD.ERGE . 'vM 

1700 45CB 494C 4CCC 5345 54D2 5345 54D3 4156 E , ILL, SET . SET. AV 

1710 45D3 5953 5^45 4DCC 5052 494E 54C4 4546 E.YSTEM. PRINT. EF 

1720 D04F 4B45 D052 494E 54C3 4F4E 54CC 4953 . OKE . RINT. ONT. IS 

1730 54CC 4C49 5354 C445 4C45 5445 C155 544F T. LIST. ELETE . UTO 

1740 C34C 4541 52C3 4C4F 4144 C353 4156 45CE . LEAR. LOAD. SAVE . 

1750 4557 D441 4228 D44F C64E D553 494E 47D6 EI7, AB ( . 0. N. SING. 

1760 4152 5054 52D5 5352 C552 4CC5 5252 D354 ARPTR, SR. RL. RR. T 

1770 5249 4E47 24C9 4E53 5452 D04F 494E 54D4 RING? . NSTR. OINT. 

1780 494D 4524 CD45 4DC9 4E4B 4559 24D4 4845 IME? . EM.NKEY? . HE 

1790 4ECE 4F54 D354 4550 ABAD A.AAF DBC1 4E44 N . OT, TEP ...... ND 

17A0 CF52 BEBD 3CD3 474E C94E 54C1 4253 C652 . R. , . ,GN . NT. BS , R 

17B0 45C9 4E50 D04F 53D3 5152 D24E 44CC 4F47 E.NP , OS . QR, ND. OG 

17C0 C558 50C3 4F53 D349 4ED4 414E C154 4ED0 . XP . OS , IN. AN , TN . 

17D0 4545 4BC3 5649 C356 53C3 5644 C54F 46CC EEK.VI . VS . VD . OF . 

17E0 4F43 CC4F 46CD 4B49 24CD 4B53 24CD 4B44 OC. OF. KI$ . KS$ . KD 

17F0 2^03 494E 54C3 534E 47C3 4442 4CC6 4958 $ . INT, SNG. DBL. IX 

1800 CC45 4ED3 5452 24D6 414C C153 43C3 4852 .EN. TR$ .JVL. SC. HR 

1810 24CC 4546 5424 D249 4748 5424 CD49 4424 $ .EFT? . IGHT$ . ID$ 

1820 A780 AEID AIIC 3801 3501 C901 7341 D301 . . . , . . 8 , 5 . . . . A. . 

1830 B622 051F 9A21 0826 EF21 211F C21E A31E ."...!,&,!!..,.. 

1840 3920 911D BllE DElE 071F A91D 071F F71D 9 ,,....,.» o.».» • 

1850 F81D 001E 031E 061E 091E A341 602E F41F ,...,<,..,. .A. ,. . 

1860 AF1F FB2A 6C1F 7941 7C41 7F41 8241 8541 ...*.. .A, A. A. A. A 

1870 8841 8B41 8E41 9141 9741 9A41 A041 B202 . A. A. A. A. A. A. A. . 

1880 6720 5B41 B12C 6F20 E41D 2E2B 292B C62B .. .A. ,..,..+)+• + 

1890 0820 7A1E 1F2C F52B 491B 7979 7C7C 7F50 .„,,,,» +1 ,.,«.. P 

18A0 46DB OAOO 007F 0AF4 OABI 0A77 0C70 OCAl F .,.....« .o o ... . 

18B0 ODES 0D78 0Al6 0713 0747 08A2 080C 0AD2 ,.,....., G, .... • 

18C0 0BC7 0BF2 0B90 2439 0A4E 4653 4E52 474F ...... ?9 . NFSNRGO 

18D0 4446 434F 564F 4D55 4C42 5344 442F 3049 DFCOVOMULBSDD/OI 

18E0 4454 4D4F 534C 5353 5443 4E4E 5252 5755 DTMOSLSSTCNNRW^ 
18F0 454D 4F46 444C 33D6 006F 7CDE 0067 78DE EM0FDL3 . . . , . « . . . 

Figure 5 
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CONVERTING BASIC FUNCTION CALL ADDRESSES TO HEX AND DECIMALS 



Converting the BASIC function CAiL addresses printed out, in ij 

Figure 4 to hexadecimal and decimal is certainly . simple, but \ I 

nevertheless a tedious job whether done with a calculator or . 

using Disk BASIC'S &H function. There is a considerably , | 

easier way to do it, ! 

The Mult-Base Numlser Conversion Program presented in Chapter 6 , 

makes the conversion of the CALL locations to hexadecimal and i 

decimal a real pleasure instead of a rote chore. This program 
may be easily modified to take the LSB and MSB from Figure_3's 
program output and automatically generate the CALL's decimal 
and hexadecimal location, but for simplicity's sake let's run 
through Chapter 6's standard numJoer conversion routine for 
generating "the CALL address for the first function shown in 
Figure 4, which is END, 

Load the conversion program. We will use the program's SPLIT 

DECIMAL TO DECIMAL routine so press 'SP' ENTER, Figure 4 shows i 

that END'S CALL location is LSB = 174 and MSB = 29, The 

program will display ''DECIMJIL ?" Press 174 then ENTER, After , 

a moment, the 174 will disappear and "DECIMAL ? " will again be \ 

displayed on video. Now, press 29 then ENTER, Faster than a 

speeding bullet, HEXADECIMAL 1 DAE will be displayed on video 

followed by DECIMAL 759 8 a second or two later. Aha, it really | 

does work. 

The conversion program's logic and flov; is as follows: ■] 

J 

1, Convert '174' to hexadecim.al and store it, 

\ 

2, Convert '29' to hexadecimal and store it, | 

3, Reverse the 2 hexadecimal numbers so it will read MSB/LSB, 

4o Display the hexadecimal number on video, - ' 

5o Convert the hexadecimal number to decimal, 

I 

6, Display the decimal number on video. 

Figure 6 is an exact printout of Figure 4's BASIC function j 

CALL addresses in both hexadecimal and decimial. Those CALL 
addresses above 12288 are of course for coupling to DOS/Disk, 
So far, so good. Now let's JP to Chapter 2 and get some I 

experience using Level II ROM's su^broutines with integer, ' 

single precision, and double precision arithmetic, V7e will 
initially only be doing 3rd grade add, subtract, multiply, and j 

divide, but we will be doing it with only a fevf CALLs instead ,> 

of lines/pages of assemlsly language programming. 

Please disregard the "curse you Red Baron," comments in ; 

Chapters 2 and 3, They were put in for reviewers/publishers 
vho\/ere given only a single chapter of this handbook. 
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MATCHING BASIC FUNCTIONS 


FUNCTION - 


- HEX - 


DECIMAL 


END 


1DAE 


7598 


RESET 


0138 


312 


CLS 


01C9 


457 


RANDOM 


01D3 


467 


DATA 


1F05 


7941 


DIM 


2608 


9736 


LET 


1F21 


7969 


RUN 


1EA3 


7843 


RESTORE 


1D91 


7569 


RETURl^ 


lEDE 


7902 


STOP 


1DA9 


7593 


TRON 


1DF7 


7671 


DEFSTR 


1E0 


7680 


DEFSNG 


1E06 


7686 


LINE 


41A3 


16803 


ERROR 


1FF4 


8180 


OUT 


2AFB 


11003 


OPEN 


4179 


16761 


GET 


417F 


16767 


CLOSE 


4185 


16773 


MERGE 


418B 


16779 


KILL 


4191 


16785 


RSET 


419A 


16794 


SYSTEM 


02B2 


690 


DEF 


415B 


16731 


PRINT 


206F 


8303 


LIST 


2B2E 


11054 


DELETE 


2BC5 


11206 


CLEAR 


1E7A 


7802 


CSAVE 


2BF5 


11253 


INT 


OB 3 7 


2871 


FRE 


27D4 


10196 


POS 


27F5 


10229 


RND 


14C9 


5 321 


EXP 


1439 


5177 


SIN 


1547 


5447 


ATN 


15BD 


,5565 


CVI 


4152 


16722 


CVD 


415E 


16734 


LOG 


4164 


16740 


MKI$ 


416A 


16746 


MKD$ 


4170 


16752 


CSNG 


OABI 


2737 


FIX 


0B26 


2854 


STR$ 


2836 


10 294 


ASC 


2A0F 


10767 


T,F,FT$ 


2A61 


10 8 4 9 


MID$ 


2A9A 


10906 



WITH J'ffiH CALL LOCATIONS 



FUNCTION 

FOR 

SET 

CMD 

NEXT 

INPUT' 

READ 

GOTO 

IF 

GOSUB 

REM 

ELSE 

TROFF 

DEFINT 

DEFDBL 

EDIT 

RESUME 

ON 

FIELD 

PUT 

LOAD 

NAl'IE 

LSET 

SAVE 

LP PINT 

POKE 

CONT 

LLIST 

AUTO 

CLOAD 
NEW 

ABS 

INP 

SQR 

LOG 

COS 

TAl'? 

PEEK 

CVS 

EOF 

LOF 

MKS$ 

CI NT 

CDBL 

LEN 

VJ^J. 

CHR$ 

RIGHT? 



HEX - DECIi4AL 



1GA1 

0135 

4173 

22B6 

219A 

21EF 

1EC2 

2039 

1EB1 

1F0 7 

1F07 

1DF8 

1E03 

1E09 

2E50 

1FAF 

1F6C 

417C 

4182 

4188 

418E 

4197 

41A0 

2067 

2CB1 

1DE4 

2B29 

2008 

2C1F 

1B49 

0977 

2AEF 

13E7 

0809 

1541 

15A8 

2CAA 

4158 

4161 

4167 

416D 

0A7F 

OADB 

2A03 

2AC5 

2A1F 

2A91 



7329 

309 
16755 
8886 
8602 
8687 
7874 
8249 
7857 
7943 
7943 
7672 
7 6 8 3 
7689 
11872 
8111 
8044 
16764 
16770 
16776 
16782 
16791 
16800 
8295 
11441 
7652 
11049 
8200 
11295 
6985 
2423 
10991 
5095 
^2057 
5441 
5544 
11434 
16728 
16737 
16743 
16749 
2687 
2779 
10755 
10949 
10783 
10897 



Figure 6 
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- CHAPTER 2 - 

INTEGER, SINGLE, AND DOUBLE PRECISION ARITHMETIC 

INTRODUCTION: 

After one has recovered from the shock of leaf^ning the 
fundamentals of assembly language programming it is| ridiculous 
to "re-invent the wheel" by writing dozens of lines or pages' 
of source code to perform simple single and double precision 
arithmetic calculations when these routines already exist in 
Level II ROM and may be accessed with a single call„ 

Assembly language programming v;ith its resulting source code 
programs running 300+ times faster than BASIC and requiring on 
the average only 1/1 0th as much memory to perform the same 
functions as BASIC is really the ne plus ultra for the serious 
amateur programmer v/ho v/ishes to advance beyond the inherent 
limitations of BASIC, Fortran, Cobol, Pascal or any of the 
high level computer languages. Prior to the "TRS-80 

DisasseiT±)led Handbook," would be assembly language programmers 
were forced to learn by rote those assembly language 
subroutines for ALL the functions that v/ere already extant in 
the Level II ROM because no one had ever figured out exactly 
how to access all these subroutines; i.e., break the 
beautifully "TIGHT CODE" code written by Microsoft's Paul 
Allen and Bill Gates. 

V/ould be assenibly programmers arise. The Level II ROM code 
has now been broken. As every cryptographer knov/s , every lock 
has a key. It is just that some locks taJce a bit longer to 
pick than others, (ask N.S.A. or MI . 5 about this). For some 
perverse reason, (probably money and the Chinese secrecy 
syndrome) , neither Radio Shack or Microsoft have been willing 
to come forv/ard and tell the 200,000+ TRS-80 users how to use 
the myriad Level II ROM subroutines in assembly language 
programs. This point is best illustrated by Radio Shack's 
book, "TRS-80 Assembly Language Programming," introduced in 
mid- 19 79 which either for stupidity or duplicity or both leads 
the would be assembly language prograininer into T-Bug (surely 
the height of backwardness/retrogression) , and then goes on 
with multi-line demonstration programs covering keyboard scan, 
video display, fill, m.ove, m.uladd, m^ulsub, compare, mull 6, 
div16, etc. that could be accomplished with only a few lines 
of assembly language programming IF the extant Level II ROM 
subroutines had been used. Let us be kind though, and presume 
■that Radio Shack had not the slightest idea what Level II ROM 
contained, and if they did, had not tJie slightest idea on how 
to find it and use it. If such is not the case, they surely 
stand guilty of gross negligence and malice aforethought 
before -tlie 200,000+ TRS-80 user comjnunity. If you have 
mastered Level II BASIC, and can at least read and write the 
English language at -the 5th grade level, you should have great 
fun wi'th this totally NEVv approach to assembly language 
programming. By mastering Level II BASIC you have demonstrated 
that you have the skills and pei'sistence to become an advanced 
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assembly language progranmier with only a fev/ weeks study 
rather than what heretofore took many months or years. The 
supposed "experts" in the field of assembly language 
programming have created an aura and mystique alsout the 
subject which is totally undeserved and seeks only to promote 
their own self esteem. "Bull roar," as the philospher said. 
I^t us take a brief look at how very simple assembly language 
programming can be by illustrating our point with a few sim.ple 
arithmetic progran^s that almost exclusively use Level II ROM 
subroutines . 

FUNDA2-1ENTALS OF LEVEL II ROM ARITHf^ETIC: 

ROM arithmetic subroutines are virtually identical to those 
you would HAVE TO write were they not NOW available to the 
assembly language programmer. This is true whether we _ are 
discussing integer, single precision, double precision, 
addition, subtraction, multiplication, division, _ as well as 
ALL the trigonometric, exponential, and log functions too. In 
fact, it is true for all Level II ROM functions which are 
nothing more than binary bytes we may manipulate as long as we 
know where they are located. Let's get on with the primer for 
4- - * and /. 

ROM (read-onlv-memory) means just what it says, READ-ONLY. 

Since it may be only read from, Level II ROM uses the RAl'l 

memory from 14302 to 17129 for all its housekeeping chores. 

The keyboard, from 14336 to 15360 is not really RAM at all, 

but a simple key/switch matrix which the rest of the system 

thinks is RAM. Video memory occupies memory locations 15 360 

to 16383. Except for memory locations 14302 to 14336, all the 

non-disk Level II RAl-l housekeeping chores are done between 

16384 and 17129. Three RAM memory locations are of particular 

interest while discussing arithmetic + - * / subroutines. They 

are the ACCUMulator, CDBL store (or "CS" abbreviation), and NT 

(number type). Arithmetic numbers stashed in RAM use the 

following conventions: integer = LSB first and MSB second 

using two's complement format, and single and double precision 

numbers = normalized exponential format with 129 added to the 

exponent and the high bit of the MSB reflecting the +- or - 

sign of the number. Do not concern yourself with these number 

formats as our Level II ROM will handle all the conversions 

necessary if we use them properly. The ACCUM occupies m.eraory 

locations 4 1 1 DH through 4124H (8 bytes) and CDBL store 

occupies 4 127H through 4 12EH, also 8 bytes. V^e must concern 

ourselves with NT (number type) as it will "blow" our whole 

subroutine if we try to perform arithm>etic operations with 

dissimilar number types ;i.e., add an integer to a double 

precision number, etc. Do not fret though, ROM lets us use 

its CINT, CSGN, CDBL functions with only a single CALL to make 

the numbers we are using compatible. 

CINT = CALL 0A7FH CSNG = CALL OABIH CDBL = CALL OADBH 

The 3 programs in this chapter provide these functions in each 
routine, so it takes real effort to foul them up if you abide 
by each number types minimal rules. 



DISASSEMBLED HMDBOOK FOR TRS-80 PAGE 15 



The NT (nuiT±)er type) single byte storage in RA!-! is located at 
40AFH. NT (40AFn)^= 2 for an integer nujTiber, = 3 for a 
string, = 4 for a single precision number, and = 8 for a 
double precision number. To change these numbers to ASCII and 
display them on vidio, sim,ply ADD 30H to the contents of f-lEM 
location 40AFH and output to the video display as .follows: 

LD A, {40AFH) ;NT location 

ADD A,30H ; convert to ASCII 

CALL 32AH ; display on video 

INTEGER ARITHMETIC + - * / : 

Fig. 7 is the source code and Fig. 8 is the object code of the 
demonstration program that will allow you to add, subtract, 
mulitply, or divide integers strictly using the ROM 
subroutines. Fast? You bet it is. As soon as you press ENTER 
you'll have the answer. Remember, your Model I TRS-80 with its 
clock running at approximately 1,774,000 cycles per second is 
no slow poke. Instead of of BASIC'S "slowsville , "^ you are now 
conversing with your Z-80 microprocessor directly, IN ITS OWN 
LANGUAGE. With no intrepeter (BASIC) required, it will zap 
along at what appears to be the speed of light. All this 
integer program does is to place the first number you input 
into the DE register, the second number you input into the HL 
register, and then CALL whatever + - * / operation you 
requested. This simple program is completely straightforward 
except for line 330 's PUSH HL and line 400 's POP DE. The stack 
begins at RAM memory location 4 288H when operating in the 
SYSTEM mode. VThat we are doing here is "saving" the first 
integer niutiber in the stack by PUSHing HL in line 330. The 
program then uses the HL register in obtaining the second 
number you input in line 340. The POP DE in line 400 _merely 
takes the previous HL value from the stack and places it into 
the DE register. The stack could care less where its contents 
go as it is just a sophisticated FILO (first-in-last-out) 
memory created and controlled by your .Z-80/ROM (unless you 
choose to modify its location with the LD SP (stack pointer) 
opcode and operand instruction. Remember, integer arithmetic 
is nothing more than placing the 'F'irst number in th'fe DE 
register, the 'S'econd number in the HL register, and 
specifying which + - * / operation you desire with the 
following CALLS: 

ADD = CALL 0BD2H SUBTRACT = CALL 0BD7H 
MULTIPLY = CALL 0BF2H DIVIDE = CALL 24 9 OH 

The result of any of these operations is always placed in the 
ACCUM. To display the result on video, merely: 

CALL OFBDH ; convert ACCUM to ASCII string 
CALL 28A7H ;display ASCII string on video 

Do not forget the Opcode, 'ADD HL, ( register pair) ' for 
integer adds up to 65535. Integers are simplesville, indeed. 
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SINGLE PRECISION ARITHI-IETIC + - * / : 

Is very sindlar to integer arithmetic, except ROM now wants 
the 'F'irst number in registers BC and DE , and the 'S'econd 
number in the ACCUM. The desired operation is performed by: 

ADD = CALL 071 6H SUBTRACT = CALL 071 3H 
MULTIPLY = CALL 0847H DIVIDE = CALL 08A2H 

For memory storage, we again use the stack as shown in lines 

340 & 350 PUSH instructions, and lines 420 & 430 POP same. 

Figs. 9 & 10 are the source code and object code for the 
single precision arithmetic demonstration program. 



DOUBLE PRECISION ARITHMETIC + - * / : 

Is not significantly different from either integer or single 
precision arithmetic subroutines, except now ROM wants the 
'F'irst number in the ACCUM and the 'S'econd number in the 
CDBL store RAM location. Desired operation is performed by: 

ADD = CALL 077CH SUBTRACT = CALL 0C70H 
MULTIPLY = CALL ODAIH DIVIDE = CALL 0DE5H 

Figs. 11 & 12 are the source and object code for the double 
precision arithmetic demonstration program. 



Sm4MARY: 

Each of these source code programs may be input by the user in 
about 5 minutes time using the EXCELLENT Radio Shack Editor/ 
Assembler that was written by Zilog's President and in-house- 
genius, Federico Faggin, and his staff. Previous assembly 
language teaching programs required months of study and page 
upon page of source code to accomplish all the double 
precision arithmetic routines. Now the average TRS-80 buff 
can master the subject in a matter of hours. 



^r. TMTMnM STRATI ON PROGRAI-l P^*^ 

00100 ; INTEGER ARITHMETIC DEMONoTRATIO. 

IIWI '.^ USING LEVEL II ROM SUBROUTINES + " * / 

r,r\^'^C\ .- 12000 DECIMAL 

o'o W4UCH EQU 7D00H -^320^^^^^ ^^^^^ ^^^l^J'T 

00150 ORG W4UCH -o" OPERATION DESIRED 

00160 BEGIN LD A,4FH DISPLAY "0" ON VIDEO 

00170 CALL 032AH ^^^^^ ^ 

00190 CALL 032AH ' ^^^^^ gp^^cE 

00200 LD ^'20H 00 IT -ON VIDEO 

00210 CALL 032Ah ^ ^.^pU^ ^ * / 

no9?n CALL 049H .nlSPLAY FimCTION 

CALL 032AH l^^fs^DESIRBD OPERATION 

00240 LD f ^^S^^ ' jODII = SKIP A LINE 

00250 LD ArODH ^^ _ q^ VIDEO 

00260 CALL 032AH '^^„ ^ p^^ST NUMBER 

nn97n LD A,46H ' _ q^ VIDEO 

CALL 032AH ;S?bd)vIDE0 I^P^T ROUTINE 

00290 CALL BB3H ^^^^ ^ 3ET '=0" FLAG 

00300 RST 10H ASCII-ACCUM ^ET MIN 

00310 CALL 0E6CH CONVERT TO ^^^TEG^J 

00320 CALL 0A7FH ^^^ INTEGER IN STACK 

00330 PUSH HL ^ 2ND NUtSER 

00340 LD A,53H -DISPLAY "S" ON VIDEO 

^°^55 CALL 032AH '.kYBD/VIDEO INPUT ROUTINE 

00360 CALL 1BB3H '-SCAN $ SET "C" FLAG 

0S37O RST 10H '.ASCII? TO ACCUM RET MIN 

00380 CALL 0E6CH 'f^^^l^ ^ ^''^^T.VC 

nn-^QO CALL 0A7FH .PPFVIOUS HL TO DE REG 

nnAon POP DE • 'p^^^LL + - * / FROM MEM 

00400 ^^^ A,(FUNCT) '^^^\\ 

00410 LD ^r^^ -IS IT + ? 

004 20 CP 2BH ^ ^^ 3^ ^^^0 ADD 

004 30 JR ;;„ "^ ;IS IT - ? „^,^^., 

00440 CP 2DH J ^p 3q ^^O SUBTRACT 

00450 JR Z.,bUD ^^g IT * ? 

00460 CP 2AH ' 3^ GOTO MULTIPLY 

00470 JR ^^r ;IS IT / ? 

00480 CP f » VIDE IE SO GOTO DIVIDE^ 

00490 JR ^^nH ;3DH IS ASCII = SIGN 

00500 VIDEO LD A,3DH ^^, _ q^ vIDEO 

00510 CALL 032AH ' ^^^^^ gp^cE 

00520 LD A,20H ' _ q^ vIDEO 

00530 CALL 032AH '^DO ;^ ,^ TO STRING 

00540 CALL OEBDH 'CON^^^ 3TrxnG ON VIDEO 

00550 CALL 2 8A7H ' ^^^^ ^ ^INE 

0056 LD A ODH ; DO IT - ON VIDEO 

00570 CALL 032A11 REPEAT ROUTINE 

00580 JR ^ ^^^^1 .ADD DE + HL 

00590 ADD CALL 0BD2H -OUTPUT RESULT 

00 600 JR Yn^in jSUBTFJ^CT DE - HL 



00610 SUB CALL 0BC7H -OUTPUT RESULT 

00 6 20 JR ^i?5° MULTIPLY DE * HL 

00 6 30 MULT CALL 0BF2H -OUTPUT RESULT 

00640 JR ^ Y/S.?, - DIVIDE DE / HL 

00650 DIVIDE CALL 2490H OUTPUT RESULT ^^^^^,^,_-^ 

00660 JR ^I^^° SAVE BYTE-STASH FUNClION 

00670 FUNCT DEFB jAMATEUR RADIO CALL LlRS 

.^.oA FND V74UCH 



A o c Q n 



00120 
00130 

7D00 00140 W4UCH EQU 

7D00 00150 ORG 

7D00 3E4F 00160 BEGIN LD 

7D02 CD2A03 00170 CALL 

7D05 3E3F 00180 LD 

7D07 CD2A03 00190 . CALL 

7D0A 3E20 00200 LD 

7D0C CD2A03 00210 CALL 

7D0F CD4900 00220 CALL 

7D12 CD2A03 00230 CALL 

7D15 327B7D 00240 LD 

7D18 3E0D 00250 LD 

7D1A CD2A03 00260 CALL 

7D1D 3E46 00270 LD 

7D1F CD2A03 00280 CALL 

7D22 CDB31B 00290 CALL 

7D25 D7 00300 RST 

7D26 CD6C0E 00310 CALL 

7D29 CD7F0A 00320 CALL 

7D2C E5 00330 PUSH 

7D2D 3E53 00340 LD 

7D2F CD2A03 00350 CALL 

7D32 CDB31B 00360 CALL 

7D35 D7 00370 RST 

7D36 CD6C0E 00380 CALL 

7D39 CD7F0A 00390 CALL 

7D3C D1 00400 POP 

7D3D 3A7B7D 00410 LD 

7D40 FE2B 00420 CP 

7D42 2823 00430 JR 

7D44 FE2D 00440 CP 

7D46 2824 00450 JR 

7D48 FE2A 00460 CP 

7D4A 2825 00470 JR 

7D4C FE2F 00480 CP 

7D4E 2826 00490 JR 

7D50 3E3D 00500 VIDEO LD 

7D52 CD2A0 3 00510 CALL 

7D55 3E20 00520 LD 

7D57 CD2A03 00530 CALL 

7D5A CDBDOF 00540 CALL 

7D5D CDA728 00550 CALL 

7D60 3E0D 00560 LD 

7D62 CD2A03 00570 CALL 

7D65 1899 00580 JR 

7D67 CDD20B 00590 ADD CALL 

7D6A 18E4 00600 JR 

7D6C CDC70B 00610 SUB CALL 

7D6F 18DF 00620 JR 

7D71 CDF20B 00630 MULT CALL 

7D74 18DA 00640 JR 

7D76 CD9024 00650 DIVIDE CALL 

7D79 18D5 00660 JR 

7D7B 00 00670 FUNCT DEFB 

7D00 00680 END 
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7 DO OH 
W4UCH 
A,4FH 
032AH 
A,3FH 
032AH 
A,20H 
032AH 
049H 
032AH 
(FUNCT) ,A 
A,ODH 
032AH 
A,46H 
032AH 
1BB3H 
10H 
0E6CH 
0A7FH 
HL 

A,53H 
032AH 
1BB3H 
10H 
0E6CH 
0A7FH 
DE 

A, (FUNCT) 
2BH 
Z,ADD 
2DH 

Z,SUB 

2AH 

Z,MULT 

2FH 

Z, DIVIDE 
A,3DH 

032AH 

A,20H 

032AH 

OFBDH 

28A7H 

A,ODH 

032AH 

BEGIN 

0BD2H 

VIDEO 

0BC7H 

VIDEO 

0BF2H 

VIDEO 

2490H 

VIDEO 



W4UCH 



- Fig. 8 Object Code 



00100 


; SINGLE PRECISION ARITIIR 


00 110 






00120 


; USING LEVEL 


II ROM SUBR 


00130 






00140 


VMUCH EQU 


7D00H 


00150 


ORG 


W4UCH 


00160 


BEGIN LD 


A,4FH 


00170 


CALL 


32AH 


00180 


LD 


A,3FH 


00190 


CALL 


032AH 


00200 


LD 


A,20H 


00210 


CALL 


032AH 


00220 


CALL 


049H 


00230 


CALL 


032AH 


00240 


LD 


(FUNCT) ,A 


00250 


LD 


A,ODH 


00260 


CALL 


32AH 


00270 


LD 


A,46H 


00280 


CALL 


03 2AH 


00290 


CALL 


1BB3H 


00300 


RST 


10H 


00310 


CALL 


0E6CH 


00320 


CALL 


0AB1H 


00330 


CALL 


09BFH 


00340 


PUSH 


BC 


00350 


PUSH 


DE 


00360 


LD 


A,53H 


00370 


CALL 


032AH 


00380 


CALL 


1BB3H 


00390 


RST 


10H 


00400 


CALL 


0E6CH 


00410 


CALL 


0AB1H 


00420 


POP 


DE 


00430 


POP 


BC 


00440 


LD 


A, (FUNCT) 


00450 


CP 


2BH 


00460 


JR 


Z,ADD 


00470 


CP 


2DH 


00480 


JR 


Z,SUB 


00490 


CP 


2AH 


00500 


JR 


Z,MULT 


00510 


CP 


2FH 


00520 


JR 


Z, DIVIDE 


00530 


VIDEO LD 


A,3DH 


00540 


CALL 


032AH 


00550 


LD 


A, 2 OH 


00560 


CALL 


32AH 


00570 


CALL 


OFBDH 


00580 


CALL 


2 8A7H 


00590 


LD 


A,ODH 


00600 


CALL 


032AH 


00610 


JR 


BEGIN 


00620 


ADD CALL 


0716H 


00630 


JR 


VIDEO 


00640 


SUB CALL 


0713H 


00650 


JR 


VIDEO 


00660 


MULT CALL 


0847H 


00570 


JR 


VIDEO 


00680 


DIVIDE CALL 


08A2n 


00690 


JR 


VIDEO 


00700 


FUNCT DEFB 




00710 


END 


W4UCH 
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+ - * / 



BY W4UCH 



= 32000 DECIMAL 

PROGPJ^M WILL START HERE 

"0" OPERATION DESIRED 

DISPI^.Y "0" ON VIDEO 

= ASCII ? i 

DO IT - ON VIDEO 

= ASCII SPACE 

DO IT - ON VIDEO 

KYBD INPUT + - * / 

DISPI^Y FUNCTION 

STASH DESIRED OPERATION 

ODH = SKIP A LINE 

DO IT - ON VIDEO 

"F" = FIRST NUMBER 

DO IT - ON VIDEO 

KYBD/VIDEO INPUT ROUTINE 

SCAN $ SET "C" FLAG 

ASCII-ACCUM RET MIN 

CONV SINGLE PPvECISION 

LOAD BCDE FROM ACCUM 

STORE IN STACK 

STORE IN STACK 

"S" = 2ND NUMBER 

DISPLAY "S" ON VIDEO 

KYBD/VIDEO INPUT ROUTINE 

SCAN $ SET "C" FLAG 

ASCI I $ TO ACCUM RET MIN 

CONV TO SINGLE PRECISION 

RESTOPvE DE REGISTER 
REGISTER 
* / FROM MEM 

IS IT + ? 

IF SO GOTO ADD 

IS IT - ? 

IF SO GOTO SUBTRACT 

IS IT * ? 

IF SO GOTO MULTIPLY 

IS IT / ? 

IF SO GOTO DIVIDE 

3DH IS ASCII = SIGN 

DO IT - ON VIDEO 

= ASCII SPACE 

DO IT - ON VIDEO 

CONV ACCUM TO STRING 

DISPLAY STRING ON VIDEO 

= SKIP A LINE 

DO IT - ON VIDEO 

REPE7\T ROUTINE 

ADD BCDE REGS TO ACCUM 

OUTPUT RESULT 

SUB ACCUM FM BCDE REGS 

OUTPUT RESULT 

MULT ACCUM * BCDE REGS 

OUTPUT RESULT 

DIV ACCUM INTO BCDE REGS 

OUTPUT RESULT 

SAVE BYTE-STASH FUNCTION 

EL FIN = EL PRIMERO 



RESTORE BC 
RECALL + - 



- Fig. 9 - 







0120 ; SINGLE 


PRECISION - PAGE . 






00130 ; 






7D00 




00140 \74UCH 


EQU . 


7D00H 


7D00 




00150 


ORG 


W4UCH 


7D00 


3E4F 


00160 BEGIN 


LD 


A,4FH 


7D02 


CD2A03 


00170 


CALL 


032AH 


7D05 


3E3F 


00180 


LD 


A,3FH 


7D07 


CD2A03 


00190 


CALL 


03 2 AH 


7D0A 


3E20 


00200 


LD 


A,20H 


7D0C 


CD2A03 


00210 


CALL 


032AH 


7D0F 


CD4900 


00220 


CALL 


049H 


7D12 


CD2A03 


00230 


CALL 


032AH 


7D15 


32807D 


00240 


LD 


(FUNCT) ,A 


7D18 


3E0D 


00250 


LD 


A,ODH 


7D1A 


CD2A03 


00260 


CALL 


032AH 


7D1D 


3E46 


00270 


LD 


A,46H 


7D1F 


CD2A0 3 


00280 


CALL 


327m 


7D22 


CDB31B 


00290 


CALL 


1B'^3H 


7D25 


D7 


00300 


RST 


10H 


7D26 


CD6C0E 


00310 


CALL 


0E6CH 


7D29 


CDBIOA 


00320 


CALL 


OABIH 


7D2C 


CDBF0 9 


00330 


CALL 


09BFH 


7D2F 


C5 


00340 


PUSH 


BC 


7D30 


D5 


00350 


PUSH 


DE 


7D31 


3E53 


00360 


LD 


A,53H 


7D33 


CD2A03 


00370 


CALL 


032AH 


7D36 


CDB31B 


00380 


CALL 


1BB3H 


7D39 


D7 


00390 


RST 


10H 


7D3A 


CD6C0E 


00400 


CALL 


0E6CH 


7D3D 


CDBIOA 


00410 


CALL 


OABIH 


7D40 


D1 


00420 


POP 


DE 


7D41 


CI 


00430 


■ POP 


BC 


7D42 


3A807D 


00440 


LD 


A, (FUNCT) 


7D45 


FE2B 


00450 


CP 


2BH 


7D47 


2823 


00460 


JR 


Z,ADD 


7D49 


FE2D 


00470 


CP 


2DH 


7D4B 


2824 


00480 


JR 


Z,SUB 


7D4D 


FE2A 


00490 


CP 


2AH 


7D4F 


2825 


00500 


JR 


Z,MULT 


7D51 


FE2F 


00510 


CP 


2FH 


7D53 


2826 


00520 


JR 


Z, DIVIDE 


7D55 


3E3D 


00530 VIDEO 


LD 


A,3DH 


7D57 


CD2A03 


00540 


CALL 


032AH 


7D5A 


3E20 


00550 


LD 


A,20H 


7D5C 


CD2A0 3 


00560 


CALL 


032AH 


7D5F 


CDBDOF 


00570 


CALL 


OFBDH 


7D62 


CDA72 8 


00580 


CALL 


28A7H 


7D6 5 


3E0D 


00590 


LD 


A,ODH 


7D67 


CD2A03 


00600 


CALL 


032AH 


7D6A 


1894 


00610 


JR 


BEGIN 


7D6C 


CD1607 


00620 ADD 


CALL 


0716H 


7D6F 


18E4 


00630 


JR 


VIDEO 


7D71 


CD1307 


00640 SUB 


CALL 


0713H 


7D74 


18DF 


00650 


JR 


VIDEO 


7D76 


CD4708 


0066 MULT 


CALL 


0847H 


7D79 


18 DA 


00670 


JR 


VIDEO 


7D7B 


CDA208 


00680 DIVIDE 


CALL 


08A2H 


7D7E 


18D5 


00690 


JR 


VIDEO 


7D80 


00 


070 FUNCT 


DEFB 





7D00 




00710 


END 


W4UCH 
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00100 ; 




DOUBLE 


* 

PPvECISION DEMONSTRATION PROGRAl-1 




00110 












00120 




USING 


LEVEL II ROM SUBROUTINES + - ^ / 




00130 












'00140 \MUCH 


EQU 


7D00H ; 


= 32000 DECIMAL 




00150 




ORG 


W4 UCH ; 


PROGPJvM WILL START HERE 




00160 BEGIN 


LD 


A , 4 FH 


"0" OPERATION DESIRED 




00170 




CAT.T, 


32 AH 


DISPLAY "0" ON VIDEO 




00180 




LD 


A,3FH ; 


= ASCII ? 




00190 




CALL 


032A1I ; 


DO IT - ON VIDEO 




00200 




LD 


A,20H ; 


= ASCII SPACE 




00210 




CALL 


032A1! ; 


DO IT - ON VIDEO 




00220 




CALL 


4 9H 


KYBD INPUT + - * / 




00230 




CALL 


032AH ! 


DISPLAY FUt.^CTIOH 




00240 




LD 


(FIWCT) ,A ; 


STASH DESIRED OPERATION 




00250 




LD 


A,0Dn ; 


ODH = SKIP A LINE 




00260 




CALL 


032AH ; 


DO IT - ON VIDEO 




00270 




LD 


A,46H ; 


"F" = FIRST NUI-IBER 




00280 




CALL 


03 2AJI ; 


DO IT - ON VIDEO 




00290 




CALL 


1BB3H 


KYBD/VIDEO INPUT ROUTINE 




00300 




RST 


lOH 


SCAN $ SET "C" FLAG 




00310 




CALL 


0E65H ; 


ASCII? TO ACCUM RET CDBL 




00320 




LD 


DE , 4 1 1 DH 


MOVE FROM ACCUM RA.M MEM 




00330 




LD 


HL, TACCUM ; 


TO TEMPORARY ACCUM STASH 




OOS-IO 




LD 


B,8 ; 


NUMBER OF BYTES TO MOVE 




00350 




CALL 


9D7H 


MOXTi; IT - SUBROUTINE 




00360 




LD 


A,5 3H ; 


"S" = 2ND NUMBER 




00370 




CALL 


032AH ; 


DISPLAY "S- ON VIDEO 




00380 




CALL 


1BB3H ; 


KYBD/VIDEO INPUT ROUTINE 




00390 




RST 


10H ; 


SCAN $ SET "C" FLAG 




00400 




CALL 


0E65H ; 


ASCII? TO ACCUM RET CDBL 




00410 




CALL 


09FCH ; 


TRANSFER ACCUM TO CDBL 




00420 




LD 


DE, TACCUM ; 


MOVE ACCUM FROM STASH TO 




00430 




LD 


HL , 4 1 1 DH , 


PERMANENT RAM LOCATION 




00440 




LD 


B,8 


NUMBER OF BYTES TO MOVE 




00450 




CALL 


09D7H 


•MOVE IT - RIGIiT NO^.' 




00460 




LD 


A, (FUNCT) 


•RECALL + - * / FROM MEM 




00470 




CP 


2BH 


;IS IT + ? 




00480 




JR 


Z,ADD 


•IF SO GOTO ADD 




00490 




CP 


2DH 


fIS IT - ? 




00500 




JR 


Z,SU3 


;IF SO GOTO SUBTPJ^CT 




00510 




CP 


2AH 


;IS IT * ? 




00520 




JR 


Z , MULT 


;IF SO GOTO MULTIPLY 




00530 




CP 


2FH 


;IS IT / ? 




00540 




JR 


Z, DIVIDE 


;IF SO GOTO DIVIDE ^ 




00550 


VIDEO 


LD 


A,3DH 


;3DH IS ASCII = SIGN 




00560 




CALL 


32A1I 


;D0 IT - ON VIDEO 




00570 




LD 


A,20H 


;= ASCII SPACE 




00580 




CALL 


32WI 


;D0 IT - ON VIDEO 




00590 




CALL 


OFBDH 


;CONV ACCUM TO STRING 




00600 




CALIv 


28A7H 


; DISPLAY STRING ON VIDEO 




00610 




LD 


A,ODH 


;= SKIP A LINE 




00620 




CALL 


032AH 


; DO IT - ON VIDEO 




00630 




JR 


BEGIN 


; REPEAT ROUTINE 




00640 


ADD 


CAiL 


0C77H 


;ADD ACCUM TO CDBL 




00650 




JR 


VIDEO 


; OUTPUT RESULT 




00660 


SUB 


CALL 


0C70H 


; SUBTRACT CDBL FROM ACCUM 




00670 




JR 


VIDEO 


.■OUTPUT FIESULT 




00680 


hOJLT 


CALL 


0DAin 


; MULTIPLY ACCUM * CDBL 




00690 




JR 


VIDEO 


; OUTPUT RiTSULT 




00700 


DIVIDE 


CALL 


ODESn 


; DIVIDE ACCUM BY CDBL 




00710 




JR 


VI DEO 


jOUTPUT RESULT 




00720 


FUNCT 


DEFB 




■.ShVr. BYTE-STASH FUNCTION 




00730 


TACCUM 


DKFS 


8 


jTEt'lPORARY ACCUM STASH 




00740 




END 


w4ucn 


jAMATEUR RADIO CALL LTRS 



- Fig. 11 - 
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00140 W4UCH EQU 7D00H 

7D00 3E4F 00160 RFrr^ ?^^ ^^^^^^ 

7D02 CD2A03 Oo o ^'"^ Sr r "^'^^^ 

7D05 3E3F OOlflO f^^ ^^^^^ 

7D07 CD2A03 00190 ^^ r n^™ 

7D0A 3E20 00200 ^^^^ 

7D0C CD2A03 00210 3:?. '^'^OH 



/ijuu cu^'A03 00210 nxrr ^"^^n 

7D0F CD4900 00220 ^^^ "^^'^ 

7D12 CD2A03 002 o ^^r'' n^l?" 

7D15 328C7D 00240 ?^^ V^^ 

7D18 3E0D 00250 r^ ^^"^^^ 

7D1A CD2A03 00260 ^ ^'^^^ 

7D1D 3E46 002^2 r^""^^ °^2AI! 

7D1F CD2A03 00280 J?, . ^'^^^ 



7022 CDB31B 00290 ?J^.^ ^^^AH 

7D25 D7 00300 S^ J^'" 

7D26 CD650E 00310 Jf r r ^°" 

7D29 111D4 1 00320 ^^^^- £^^5" 



7D2C 218D7D 00330 rn DE,41lDII 

7D2F 0608 00340 r HL,TACCU.M 

7D31 CDD709 00350 ^'^ 

7D34 3E53 00360 ?'^'' °^°^" 

7D36 CD2A03 00370 " A,53H 

7D39 CDB31B 00380 ^ V^^' 

7D3C D7 00390 S?^ ^^^^^ 

7D3D CD650E 00400 ?f t t " 

7D40 CDFC09 00410 St^ ?f 5" 

,r , 7D43 118D7D 00420 r^ '^^^^^ 

i.„/ 7D46 211D4 1 004 30 ^^ DE,TACCUM 

7D49 0608 00440 l"^ HL,41lDH 

7D4B CDD709 00450 oPr . ^'^ 

7D4E 3A8C7D 00460 ?^^ °^'^^" 

■7D51 FE2B 00470 ^^ A, (FUNCT) 

7D53 2 82 3 Jo, go tp '^" 

7D55 FE2D 00490 Z,ADD 

7D57 2824 00500 ^^ ^DH 

7D59FE2A SolJS g ,^'^^ 

7D5B 2825 00520 ^^^ 

7D5D FE2F 00530 '^J ^^'i'UI'T 

7D5F 2826 00540 ?p ^™ 

7D61 3E3D 00550 VIDEO H A'?nn'^^ 

7D63 CD2A03 00560 . n°rr A,3DH 

7D66 3E20 00570 P'^^ ^^^AJI 

7D68 CD2A03 00580 T^r. ^'^^'^ 

7D63 CDBDOF 00590 ^^^^ ^^^AIJ 

7D6E CDA728 00600 ^^^^ °™DH 

7D71 3E0D ooefo S'"^ 2aA7H 

7D73 CD2A03 00620 ^ A,ODH 

7D76 1888 0063^ ^^^ °^27vH 

7D78 CD770C 00640 Ann ^^ ^^^'^^^ 

7D7B 18E4 oog^O "^^ JJ^^ 0^^^" 

7D7D CD700C 00660 qrm 1^ VIDEO 

7D80 18DF So670 ?"^^ ^^^O" 

7D82 CDA10D 00630 MJLT St r n^°^° 

7D85 18DA 00690 ^^^ ^^^'I" 

7D87 CDE50D 00700 DIVinP rt r "^^^^ 

7D8A 18D5 00710 ^^^°^ ^^^^ 0DE5H 

7D8C 00 00770 rr,M^ "^^ VIDEO 

0008 007?n 5™" °"^3 

7D00 00740 '^''''"'"' ^^^^ 8 

^^^^^ END W4UCH 

- Fig, 12 - 



TRS-80 DISASSEJ-ffiLED HANDBOOK ■ PAGE 2 3 



- CHAPTER 3 - 

USING LEVEL II ROM SUBROUTINES 
IN ADVANCED ASSEMBLY LANGUAGE PROGRAMING 

- TRIGONOMETRIC, LOG, EXPONENT, ET AL FUNCTIONS - 

(notes from a lecture) 

Here is an interesting test program for the advanced assembly 
language programmer. It allows the user to access and test 
many of the myriad arithmetic/trigonometric subroutines that 
are extant in the excellent TRS-80 Level II ROM that was 
written by Microsoft's Bill Gates and Paul Allen. 

The beginning assembly language programmer should certainly be 
taught and learn the how, why, and v;herefores of writing 
fundamental arithmetic/trig functions by him/her self, but 
once these techniques have been mastered as part of the 
learning process, it is certainly inefficient, time wasting, 
and rather rediculous to re-invent the wheel by duplicating in 
assembly language those subroutines already extant in the 
Level II ROM. 

Table 1 lists those functions and their addresses that may be 
accessed and tested by this mini-program that only occupies 
144 bytes of high memory and may be entered using the TRS-80 
Editor/Assembler in about 5 minutes. 

Figure 13 is a print-out of the test program's source code and 
Figure 14 a listing of the program's object code. As may be 
easily seen, the majority of this program is written using 
Level II ROM subroutines. Were these subroutines not used in 
this particular assembly language test program, it would 
require approximately 10 times as much proaram memory and 
occupy 550 rather than 55 assembly language program lines. 

PROGRAM FLOW: 

The comments included with the source code program delineate 
each line's function. There is no need to duplicate or expand 
upon the comments here as they are largely self-exolanatory , 
This program operates equally well with non-disk Level II, DOS 
2.1, DOS 2.2 and NE\-roOS+. Program operation is as follows: 

1. Load the program under the SYSTEM or DOS command. Give it 
any name you wish. We like the program name DISCOV, for 
discovery, since that is what the program is all about. 
After loading is complete, type in /32000 to activate the 
program (with disk you must first load BASIC, then type 
SYSTEM, ENTER, and then type in /32000 ENTER, if you 
loaded the program in DOS) . 
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2. The letter 'N' ? will appear on video. The program is 
asking you for a number to work on. Any number up to 
16 digits is alright depending on the function you wish 
to test. Let us start out with a simple example by 
entering the number 10000, a nice round easily ^visualized 
number, ENTER. 

3. The numbers '2' '10000' will appear on the next line of 
the video display. The '2' is the number 'type' 
brilliantly calculated by the LeveL II ROM. Since we are 
dealing only with numbers in this Chapter we will blithely 
skip over strings et al for the time being. The number 
types are as follows: 2 = integer, 4 = single precision, 
and 8 = doiible precision. Table 1 lists those operations 
that can be performed on a nun\ber for a given nuj-nber type; 
i.e. , it is against the rules to take the square root SQR 
of an integer. V7e must first change to single precision. 

4. On the follov;ing line of the video display you v/ill see 

•C ? '. The program is asking you what type of CONVERSION 
you wish. Let's enter 27 37 which = CSN^;, change our 
number from an integer to single precision, ENTER. The 
next line will show", '4' '1000'. We now have a single 
precision number to work with, so let's now try taking its 
square root by typing in 5095 = SQR, then ENTER. ZAP... 
...the next line shows '100'. All, the miracle of modern 
computer science at work. It sure was easier than writing 
a complete stand alone assembly language square root 
subroutine. Let's try it again. Type in 5095 ENTER. 
Again the line below displays the square root. This time 
the numeral 10. 

5. Stick around as this is only the beginning. To insert a 
new number to try your program on merely type in 32 00 
ENTER. This brilliantly brings us back to where we 
started by displaying 'N ?'. Is 32000 a subroutine? 
Sure it is. You wrote it. Our asseiiably language program 
does not discriminate between ROM or RAI-I. It could care 

6. We could go on and. on converting numbers like deriving 
the natural LOG of any number and then restoring it with 
the EXP command, and/or deriving the TANgent of a number, 
then its arc tangent ATN , and then the TANgent again .... 

ad infinitum. You may escape this 

conversion routine any time your wish by typing 6681 ENTER 
which will take you back to BASIC with a READY displayed. 
All you need do to return to your conversion routine is 
type SYSTEM then ENTER and type /32000 then ENTER. 
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This lecture covers only a few of the subroutines extant in 
Level II BASIC ROM that are illustrated in T£ible .1. 



4 



Assembly language programming is the ne plus ultra of serious 
computing and really the Mt. Everest of our hobby. You master 
it and you climb it because it is there. The fallout of 
having any assenibly language program run 300 times faster than 
the same program in BASIC, and the extra plus of only using 
1/1 0th as much memory as the same program in BASIC are really 
the topping/icing of the cake. 

Learning to talk to your computer in its own language rather 

than through an intrepter (BASIC, Fortran, Pascal, or 

what"have-you) , is probably one of the most satisfying and 

rewarding experiences you will ever have if you have the 
patience and fortitude to master it. 



ADDENDUM: 

The demonstration program illustrated in Figure 13 will easily 
perforra many more functions than the short list covered in 
Table 1 . Make a note to come back to this program after you 
have finished Chapter 4 and have become familiar with data 
movement and data conversion subroutines. 

Most all of the arithmetic + - * / subroutines using integer, 
single precisi.on, and double precision numbers may be used by 
judiciously storing one number in "CS", the CDBL Store. <;aLL 
2555 decimal = 09FCH moves data from the ACCOM to "CS". The 
next number is then input by loadino "32000" into CONV ? and 
then entering this number in the ACCUM. 

By keeping close track of the NT (number type) so you call the 
appropriate arithmetic/conversion subroutine, and using the 
data movement subroutines covered in the next chapter, it is 
quite easy for this demo program to calculate LOG to the base 
10, manipulate trig functions as desired, etc. Though you 
will never write a real-time program such as that given in 
Figure 13, it nevertheless offers you an excellent opportunity 
to practice and become familiar with Chapter 4's data 
conversion and data movement subroutines. Besides, it is an 
intellectual challenge .... and challenges are fun when you WIN. 
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II 

note: number types 2 = integer 4 ■= single 

8_ = double precision 


precision 


FUNCTION 




NUMBER TYPE 


DECIMAL 


^ HEXADECIMAL 


ABS 






2-4-8 


2423 


0977 


ATN 






4-8 


5565 


15BD 


BASIC 






(RETURN L II) 


6681 


1A19 


BASIC 






(RETURN DISK) 


112 


0075 


BREAK 






(RST ADDRESS) 


16396 


400C 


CDBL 






2-4 


2779 


OADB 


CINT 






4-8 


2687 


0A7F 


CLS 






2-4-8 


457 


01C9 


COS 






4-8 


5441 


1541 


CSNG 






2-8 


2737 


0AB1 


EXP 






4-8 


5177 


1439 


FIX 






2-4 


2854 


0B26 


INT 






2 


2871 


0B37 


INVERT 


SIGN 




2 


3153 


0C51 


INVERT 


SIGN 




4-8 


2434 


0982 


LOG 






4-8 


2057 


0809 


MEMORY 






(DEFINE SIZE) 


181 


00B5 


RANDOM 






2-4-8 


467 


01D3 


RETURN 






(TO SUBROUTINE) 


32000 


7D0 


RND (see liini 


.ts) 


2-4-8 


5321 


14C9 


SGN 






2 


2442 


098A 


SIN 






4-8 


5447 


1547 


SQR 






4-8 


5095 


13E7 ■ 


TAN 






4-8 

- TABT.F, 1 - 


5544 


15A8 



00100 W4UCH 


EQU 


7D00H 


00110 


ORG 


W4UCII 


00120 


LD 


A, 4 EH 


00130 


CALL 


032AH 


00140 


CALL 


1BB3H 


00150 


RST 


10H 


00160 


CALL 


0E6CH 


00170 RETURN 


EX 


AF,AF' 


00180 


EXX 




00190 


LD 


DE , 4 1 1 DH 


00200 


LD 


HL, STORE 


00210 


LD 


B,8 


00220 


CALL 


09D7H 


00230 


LD 


DE,4127H 


00240 


LD 


HL,CDBL 


00250 


LD 


B,8 


00260 


CALL 


09D7H 


00270 


LD 


A, (40AFH) 


00280 


LD 


(FLAG) ,A 


00290 


ADD 


A, 48 


00300 


CALL 


032AH 


00310 


LD 


A,20H 


00320 


CALL 


032AH 


00330 


CALL 


OFBDH 


00340 


CALL 


28A7H 


00350 


LD 


A,ODH 


00360 


CAI.L 


032H 


00370 


LD 


A,43H 


00380 


CALL 


32AH 


00390 


CALT, 


1BB3H 


00400 


RST 


10H 


00410 


CALL 


0E6CH 


00420 


CALL 


0A7FH 


00430 


LD 


(CONV) ,HL 


00440 


LD 


DE,CDBL 


00450 


LD 


HL,4127H 


00460 


LD 


B,8 


00470 


CALL 


09D7H 


00480 


LD 


DE, STORE 


00490 


LD 


HL,411DH 


00500 


LD 


B,8 


00510 


CALL 


09D7H 


00520 


LD 


A, (FLAG) 


00530 


LD 


(40AFH) ,A 


00540 


LD 


HL, RETURN 


00550 


PUSH 


HL 


00560 


LD 


HL, (CONV) 


00570 


PUSH 


HL 


00580 


EX 


AF,AF' 


00590 


EXX 




00600 


RET 




00610 FLAG 


DEES 


1 


06 20 CONV 


DEFS 


2 


00630 CDBL 


DEFS 


8 


00640 STORE 


DEFS 


8 


00650 


END 


W4UCH 



7D00H = 32000 DECIf-lAL 'PAGE 27 
PROGPJ^.M WILL START HEPJ3 
4EH="N"=NU.NiBER DESIRED ? 
DISFL7.Y "H" ON VIDEO 
KYBD/VIDEO INPUT ROUTINE 
SCAlsi STRING - SET C FLAG 
ASCII-ACCUM RET I-IINIMUM 
EXCHANGE REGISTERS- \ 

TO PRESER\^E VALUES. ' 
MOVE MEM ACCUM DATA FROM , 

TO TEMPOR.z\RY STASH. 
NUMBER OF BYTES TO MOVE 
MOVE IT - SUBROUTINE 
lAOVE CDBL DATA FROH- 
TO TEMPORARY STASH. 
NUMBER OF BYTES TO MOVE 
MOVE IT - SUBROUTINE 
NUMBER TYPE MEM LOCATION 
MOVE TO TEMPORARY STASH 
CONVERI TO ASCII NUMBER 
DISPLAY NUMJ3ER TYPE 
2 0H = ASCII SPACE 
DISPLAY SPACE ON VIDEO 
CONV MEM ACCUM TO ASCII? 
DISPLAY CON^/ERTED NUMBER 
ODH=SKIP A LINE/CARR RTN 
DO IT - ON VIDEO DISPLAY 
"C" = CONVERSION NUMBER? 
DISPLAY "C" ON VIDEO 
KYBD/VIDEO INPUT ROUTINE 
SCAN STRING - SET C FLAG 
ASCII-ACCUM RET MINIMUM 
CONVERT TO INTEGER 
STORE CONVERSION ADDRESS 
MOVE CDBL DATA FM STASH- 
TO PE REMANENT ADDRESS, 
NWEER OF BYTES TO MOVE 
MOVE IT - SUBROUTINE 
MOVE MEM ACCUM FM STASH- 
TO PERMANENT ADDRESS. 
NUMBER OF BYTES Ta MOVE 
MOVE IT - SUBROUTINE 
NUMBER TYPE FROM STASH- 
TO PERMANENT ADDRESS. 
RETUP^N MEM LOCATION- 
LOADED INTO STACK. 
CONVERSION MEM LOCATION- 
LOAD ON TOP OF STACK, 
RESTORE REGISTERS- 
TO ORIGINAL VALUES, 
SNEAKY CALL-TOP OF STACK 
NUMBER TYPE STASH 
CONVERSION ADDRESS STASH 
CDBL DATA STASH 
ACCUMULATOR STASH 
;Ai'IATEUR RADIO CALL LTRS 



Fig, 13 Source Code - 
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7D00 




00100 W4UCH 


EQU 


• 7D00H 


7D00 




00110 


ORG 


174 UCH 


7D00 


3E4E 


00120 


LD 


A,4EH 


7D02 


CD2A03 


00130 


CALL 


32AH 


7D05 


CDB31B 


00140 


CALL 


1BB3H 


7D08 


D7 


00150 


RST 


10H 


7D09 


CD6C0E 


0016 


CALL 


0E6Cn 


7D0C 


08 


017 RETURN 


EX 


AF,AF' 


7D0D 


D9 


00180 


EXX 




7D0E 


111D41 


00190 


LD 


DE , 4 1 1 DH 


7D11 


21837D 


00200 


LD 


HL, STORE 


7D14 


0608 


00210 


LD 


B,8 


7D16 


CDD709 


00220 


CALL 


9D7H 


7D19 


112741 


00230 


LD 


DE,4127H 


7D1C 


217B7D 


00240 


LD 


HL,CDBL 


7D1F 


0G08 


00250 


LD 


B,8 


7D21 


CDD709 


00260 


CALL 


09D7H 


7D24 


3AAF40 


00270 


LD 


A, (40AFH) 


7D27 


32787D 


00280 


LD 


(FLAG) ,A 


7D2A 


C530 


00290 


ADD 


A, 48 


7D2C 


CD2A03 


00300 


CALL 


32AH 


7D2F 


3E20 


00310 


LD 


A,20H 


7D31 


CD2A03 


00320 


CALL 


032AH 


7D34 


CDBDOF 


00330 


CALL 


OFBDH 


7D37 


CDA7 2 8 


00340 


CALL 


28A7H 


7D3A 


3E0D 


00350 


LD 


A,ODH 


7D3C 


CD3200 


00360 


CALL 


032H 


7D3F 


3E43 


00370 


LD 


A,43H 


7D41 


CD2A0 3 


00380 


CALL 


32AH 


7D44 


CDB31B 


00390 


CALL 


1BB3H 


7D47 


D7 


'00400 


■RST 


10H 


7D4 8 


CD6C0E 


00410 


CALL 


0E6CH 


7D4B 


CD7F0A 


00420 


CALL 


0A7FH 


7D4E 


22797D 


00430 


LD 


(CONV) ,HL 


7D51 


117B7D 


00440 


LD 


DE,CDBL 


7D54 


212741 


00450 


LD 


HL,4127H 


7D57 


0608 


00460 


LD 


B,8 


7D59 


CDD709 


00470 


CALL 


09D7H 


7D5C 


11837D 


00480 


LD 


DE, STORE 


7D5F 


211D41 


00490 


LD 


HL,411DH 


7D62 


0608 


00500 


LD 


B,8 


7D64 


CDD70 9 


00510 


CALL 


09D7H 


7D67 


3A787D 


00520 


LD 


A, (FLAG) 


7D6A 


32AF40 


00530 


LD 


(40AFH) ,A 


7D6D 


210C7D 


00540 


LD 


HL, RETURN 


7D70 


E5 


00550 


PUSH 


HL 


7D71 


2A797D 


056 


LD 


HL, (CONV) 


7D74 


E5 


00570 


PUSH 


HL 


7D75 


08 


00580 


EX 


AF , AF ' 


7D76 


D9 


00590 


EXX 




7D77 


C9 


00600 


RET 




0001 




0610 FLAG 


DEFS 


1 


0002 




00620 CONV . 


DEFS 


2 


0008 




00630 CDBL 


DEFS 


8 


0008 




00640 STORE 


DEIFS 


8 


7D0 




00650 


END 


W4UCH 



Fig. 14 - 
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- CHAPTER 4 - 



ANCILLARY LEVEL II ROM SUBROUTINES 



INTRODUCTION: 

Chapters 2 and 3 used a number of Level II ROM ancillary 
subroutines that were not fully explained except for a few 
words in the source code comment column. Using Level II ROM 
BASIC functions' CALL subroutines efficiently requires a 
modest understanding of how to use other ancillary ROM 
subroutines that are there just waiting to be used. They 
include: KEYBOARD input, MOVE data, COMPARE data, CONVERT 
data, VIDEO output, and LINE PRINTER output amongst others. 
This chapter will present the CALL addresses and briefly 
explain the most useful ROM ancillary subroutines that will 
truly make shorthand assembly language programming a reality 
for you. 

KEYBOARD REVIEW: 



Every advanced assembly language programmer knows that the 
keyboard is simply nothing more than a key/switch matrix that 
"looks like" RAM memory to Level Ii rqm. The keyboard's eight 
MEM locations are shown below in decimal. UA = up arrow, DA = 
down arrow, LA = left arrow. and RA = right arrow. 



PEEK 
PEEK 
PEEK 
PEEK 
PEEK 
PEEK 
PEEK 
PEEK 



14337) 
14338) 
14340) 
14344) 
14352) 
14368) 
14400) 
14464) 



(§ 
H 
P 
X 

8 
ENT 
SHIFT 



A 
I 

Q 
Y 
1 
9 

CLR 



B 
J 
R 
Z 
2 

• 

BRK 



C 

K 
S 

3 

UA 



D 
L 
T 



DA 



E 

M 
U 

5 

LA 



F 
N 
V 

6 

RA 



G 


W 

7 

/ 

SPA 



VALUE 



1 



8 



16 



32 



64 



128 



The keyboard/switch matrix will output the VALUES shown above 
.when ^a single key is pressed at the corresponding MEM 
location. For multiple keys pressed simultaneously, add up 
the values for each key; i.e., "JKL" = 4 + 8 + 16 = 28 total 
at MEM location 14338 decimal. With these facts in hand it is 
easy to see how very simply NE^TOOS+ includes the feature of 
line printing out the video display contents whenever "JKL" 
are pressed simultaneously. Now, go write a brief assen±)ly 
language program that will do so with non-disk Level II. For 
the inveterate experimenter, try this little 1 line program 
and press any combination of keys in the PEEK (14338) row: 



10 X=PEEK(14338) :PRINT@478 , X: G0T01 
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The 3 most useful Level II ROM ancillary subroutines for the 
keyboard follow. CALL locations are in hex. 



CALL 002B 



CALL 04 9 : 



CALL 1BB3 



This is the most fundamental keyboard subroutine 
that scans the entire key board and returns the 
ASCII character in the "A" register. \A JR Z loop 
must be created to repeat the. scan as shown belov/: 
KYBD CALL 2BH 

CP 00 

JR Z,KYBD 

^■Thenever a key is pressed, the CP (compare) "A" 
register with OOH is NOT zero so the program falls 
through to the line following JR Z,KYBD. This was 
the most commonly used keyboard subroutine by 
early assembly language programmers v/ho did not 
know any better. It is seldom used any longer. 

This is the ROM subroutine most similar to BASIC'S 
INKEY$ function. It automatically scans the 
keyboard Ul^TIL a key is pressed and then places 
the value in "A" register. No assembly language 
loop subroutine is required. A giant step forward 
from the 002BH fundaimental keyboard CALL. 

This is the big bazoo keyboard subroutine you will 
be using most frequently. It first displays the 
"?" prompt . Then input via the keyboard is 
converted to string format and term.inated with a 
zero (up to 240 bytes) . This string is stored at 
40A7H + string length. It is usually followed by 
an RST 10 which sets the "C" flag. See the 
programs in Chapters 2 and 3 which use this call. 
This call automatically outputs keyboard input to 
the device specified by the contents of MEM 
location (409CIi) : -1 = cassette, = video display 
and +1 = line printer. ROM initializes (409CH)=0. 
This subroutine is surely one of the most time 
saving, valuable, and frequently used ROM 
subroutines you will be using henceforth. A single 
CALL 1BB3H v/ill replace dozens of lines, if not 
pages, of assembly language programiT;ing for you. 



DATA M0\TE;MENT: 

Level II ROM ancillary subroutines exist 
assembly language programs FROM - TO 
locations conceivable, often with only a 
tremendous time and line savers and 
acquainted with on a first-hand basis. 



for moving data in 

virtually any and all 

single CALL. They are 

well worth becoming 



One of the most useful data miovement subroutines is that given 
in the data movement table's first line, CALL 09A4H. This CALL 
automiatically transfers either an integer or single precision 
number from the ACCUM at MEM locations 4 1 1 DH through 4 124DH to 
the stack. POP BC ajid then POP DE will retrieve the nujT±)er. 
NOTE: Add, CALL 1C90H to compare table next page (HL-DE NT=2). 
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If the number is sinalp nmr-i c-i' ^v, „ • , 

■I +- T-p • X ^■i-iiyj-c precision, registers Br^DE will rnn^3^r, 

xt. If an integer, register DE will hold the number 

thosf tn"" 1 '• ^ "^""^ ^rnover^ent subroutines are . very useful 
rxiose m lines "j" and "r" Hocor-.r-, ^ ■ ■, " ^^^ userui, 

MOVE up to 255 bytes frSm (DV) to (m ) """"'vu^^ "S'"'' -"^^^^^ ^^^^ 

requires that the nJ^er of bvtis t^ hf ^ '''^'"S^^^'"^ ^^ ""'" 
reaistpr ->r.r^ +.K "'^iiLuej: ox Dytes to be moved be in the "A" 

i-t:yj,i3-i::ei7 and the Subrnnt-inn ^+-"1'" •■ , ■-■•-■iii-iic: rt 

Of bytes to be moverbelrthe "B" r^gL'te'r! '''' ''' ""^^" 

r==doS^:'prL'LIon''\nd f °"f i? '^^ ^' ^°"^^^^ ^ = ^^^^^-^ 
fc- precision, and 8 = double precision. CS=CDBL store. 



- DATA MOVEMENT TABLE 



NO. 

A. 

B, 

C. 

D. 

E. 

F. 

G. 

H. 

I. 

J. 

K. 

L. 

M. 

N. 

0. 

P. 

Q. 

R. 

S. 

T. 

U. 

V, 

NOl^E: 

but 

with 

simpl 

Chapt 

and 

used 



FROM 

ACCU?-I 
(HL) + 
BCDE 
ACCOM 
(HL) + 
ACCOM 
(DE) + 
(HL) + 
(DE) + 
(DE) + 
(DE) + 
"CS" 

ACCOM 

HL 

DE 

HL 

BC 

DE 

HL 

STACK 

STACK 

STACK 



TO 

STACK 
ACCOM 
ACCOM^ 
BCDE 
BCDE 
(HL) + 
(HL) + 
(DE) + 
(HL) + 
(HL) + 
(HL) + 

ACCOM 

"CS" 

ACCOM 

HL 

DE 

STACK 

STACK 

STACK 

HL 

DE 

BC 



CALL 

9A4H/24 6 8 

09B1H/2481 

09B4H/2484 

9BFH/24 9 5 

09C2H/2498 

09CBH/2507 

9CEH/2510 

09D2H/2514 

9D3H/2515 

9D6H/2518 

09D7H/2519 

09F4H/2548 

09FCH/2556 

0A9AH/2714 

EX DE,HL 

EX DE,HL 

POSH BC 

POSH DE 

POSH HL 

POP HL 

POP DE 

POP BC 



NT(40AFH) 

2,4 
4 
4 
4 
4 
4 
4 
2,4,8 
2,4,8 
A REG 
B REG 
2,4,8 
2,4,8 
2 
2 
2 
2,4 
2,4 
2 
2 
2,4 
2,4 



Lines "0" through "V" are iust nl-,ir, ^i ^ r, oo 
o v-r, ,•„!-,-, cii.e J ub t: piam old Z-80 nprnnpc 

xn?eaerf orlina?/™"' '"" prograr..er that !L„°dealfng 

iiicaiib or moving or temporarily stnri n^T r^=.+--, o 
er 2 where POSH and POP are used to ?tor. k^.k ^^^ 



DATA COMPARISONS: 

'LTenlly'^'ulir function' L^^o^' ."'^^^ ^^^ ^^^'^ °^ ^^^ --t 
ROM very though?fullv includes these f ^^^^^ ^"5- ^evel II 
performed wi?h a sLa e catt th ^^^''^ftions that may be 
"A" register and ~ zero tf the" rnmn! ^^'''^' "" returned in the 

compare is >, and =25? toFFH) iflu '" ^^^^^' ^ +^ ^^ the 
<> J'u ZDD lUfFH) If the compare is <, 
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- COtiPARE TABLE - 



NO. 


ITEM #1 


SUBTRACT 


ITEM #2 


CALL 


NT(4 0AFH 


A. 


ACCUM 


_ 


BCDE 


4 

OAOCH 




4 


B. 


HL 


- 


DE 


0A3 9H 




2 


C. 


ACCUM 


- 


"CS" 


0A4FH 




8 


D. 


"CS" 


- 


ACCUM 


0A7 8H 




8 


E. 


ACCUM 


DETERf-ilNE SIGN 


0994H 


2 


,4,8 



NOTE: No. E above is same as the B/vSIC SGN function, but 
returns to register "A": zero if ACCUM = 0, +1 if 
ACCUM greater than zero, and 255 (OFFH) if ACCUM is 
less than zero. 



- DATA CONVERSIONS - 

Are straightforv,'ard and very necessary in most all arithmetic 
operations as the NT (number type) must match-up with the CALL 
subroutine's function; i.e., integer, single precision or 
double precision + - * /. The most useful conversions are: 

CALL 0A7FH: any ACCUM to integer ACCUM (CINT) . 

CALL OABIH: any ACCUM to single precision ACCUM (CSNG) . 

CALL OA.CCH: integer ACCUM to single precision ACCUM. 

CALL OACFH: integer HL to single precision ACCUM. 

CALL OADBH: any ACCUM to double precision ACCUM, 

CALL 0E65H: ASCII string to ACCUM in double precision format. 

CALL 0E6CH: ASCII string to ACCUM; NT will = minimum required. 



ADDITION 



SUBTRACT 



MULITPLY 



DIVIDE 



- ARITHMETIC CALL SU^LMARY - 
INTEGER NO. SINGLE PRECISION 



0BD2H/3026 
DE+HL 

0BC7H/3015 
DE-HL 

0BF2H/3058 
DE*HL 

2490H/10560 
DE/HL 



0716H/1814 

BCDE+ACCUM 

0713H/1811 
BCDE-ACCUM 

0847H/2119 

BCDE+ACCUM 

8A2H/2210 

BCDE /ACCUM 



DOUBI^ PRECISION 

0C77H/3f91 
ACCUM+"CS" 

0C70H/3184 
ACCUM- "CS" 

08A2n/2210 
ACCUM*" CS" 

0DE5H/3557 
ACCUM/" CS" 



NOTE: NT (number type) at (4 0AFH) must agree with operation 
CALLed. NT: 2 = integer, 3 = string, 4 = single 
precision, and 8 = double precision. 

* ACCUM at MEM locations 4 1 1 DH through 4 124H. 

* «CS" = CDBL Store at MEM 4127H through 41. EH. 
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- VIDEO DISPL.A.y - 

Most all TRS-80 video display sul^routines have been well known 
to computer buffs the last 2 years, including the, fundamental 
ROM video subroutine, CALL 033H which display the "A" register 
on video. CALL 032A1-I also displays the "A" register on video 
if MEM location 409CH contains a zero which is the value 
stored upon intitialization. Most IMiPORTAI^TLY , CALL 032AH does 
indeed store the video display LINE cursor position at MiEZ-I 
location 40A61I which is very useful and elirainates redundant 
programjning on your part. 

One of tlie m.ost important subroutines for reflecting keyboard 
input on video is CALL 1BB3H v.-hich was covered earlier in this 
Chapter. This CALL displays the string beginning at (HL) and 
terminated with a zero on video if MEM location 409CK contains 
a zero. The video display control block, page D/1, Level II 
Manual in conjunction with the line cursor position at 40A6H 
allows you to modify and/or use the video display as you \.'ish. 

One of the more fascinating assembly language exercises using 
the video display, is to write a "tight" source code program 
that creates SPLIT-SCREEN video operation. The upper half of 
the video display serves as the RECEIVE sector for Morse code, 
radio teletype (ASCII now allowed) , or even simple phone line 
MODEM communications, while the lower half of the video 
display would serve as the TPANSMIT segment. This segment 
allows the user either "look-ahead" or "type-ahead" FIFO 
(first-in-first-out) operation from RAM at whatever output 
baud rate desired. If you have the upper-case/lower-case 
modification recommended by Electric Pencil, it is a simple 
matter to have tliose characters that have already been 
transmitted in upper-case, and those characters yet to be 
transmitted in lower-case. Alternatively, a moving cursor or 
a moving CHR?(170) figure may be used to indicate what data 
has been transmitted versus data yet to be tranmitted in the 
TRANSMIT sector of the video display. Botli halves of the video 
display operate entirely indepently; i.e., from, their own 
separate video MEMs in RAM with their own scrolling, etc. The 
transmit sector utilizes tlie Z-80's interrupt mode for "type- 
ahead" simplex operation. Remember, video memory is just plain 
old RAM and may be used for storage (as in FIFO) just like any 
other RAM memory segment. 



- LINE PRINTER - 

Much like the video display, there are few significant new 
surprises about line printer ROM subroutines. Again, the 
value stored in MEM location 409CH determines where the output 
from CALL 032AH & 1BB3H keyboard subroutines goes; i.e,, if 
(409CH) contains +1, the output will go to the line printer. 
As shown on page D/1 of the Level II Manual, the line printer 
address is 37E8H and line printer control block from MEM 
locations 4025H to 402CH. MJZM location 37EBH will contain the 
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value 63 decimal = ASCII ? when your line printer is ready to 
•accept another character (handshake). A few cheap surplus 
prLLrs do not have this handshake feature and should be 
avoided like the plague; caveat emptor, especially ^^^h old 
DATEL printers of ALL types and ALL varieties. Old DAiti. 
printers, even those with the handshake feature f Jjf 7|;j 
make good boat anchors for small dmghys. As soon as ^EM 
location 37E8H receives the 6 3 handshake ^ ^°- J^^^, ,^^^^ 
printer it is ok (in most cases) to^load the "^^-'^ character to 
be printed into (37E8H) via "A" register and the LD °P^°^e An 
exception to this rule is illustrated m f ^P^er 7 s Print 
All Zeros With A Slash Program," where an extra 20 millisecond 
delay was required to allow the vibration from a BACKSPACE to 
dampen/die out. 

This slash/zero program has not been previously P^^^^^^^^^^^ 
illustrates a few interesting points about J;^"^^ P™^J 
programming. It intercepts the NEXT character to be printed by 
modifying the line printer driver address ^ at ^O^^H and 4027H 
to allow a moment's branching to this _ brief ^°^^i^e. It ^ust 
so happens that the "C" register contains the NEXT character 
to be printed when using the LLIST comand with "^^l-^^^^^^J;^^^^ 
II, DOS 2.1, DOS 2.2, and NEVJDOS+, as well as the NEyoOSt 
"JKL" feature that LPRINTS the contents of the video display. 
By simply testing the next character to be printed, a variety 
of options are made available to the programmer. 

To illustrate a few points, let us assum.e that YO!^^ IJ:^^ 
printer utilizes IBM's highest-quality heavy-duty Selectric 
fnechanism like the Western I/O (IBM ^2970) Printer Ter-minal 
for the TRS-80 that sells for $1100. Only 8 years ago, these 
IBM #2970 -s sold new for over $7000. each, so here is tne 
industry's most cost-effective P^^^^er that is completely 
refurbished, on the market today. It is the ne plus ^Itra for 
those who demand IBM quality print out m both 1°'^^^, ^f , ^P?^^ 
case, in addtion to the decided advantage of being able ^ to use 
any ir all of the myriad type faces offered m inexpensive IBM 
Selectric snap-in type spheres. 

Even the excellent ASCII IBM type spheres do not include the 
ziro with a slash across it as it looks mighty STRANGE indeed 
to non-computer types reading a business letter. In some 
program listings though, it is of considerable assistance to 
the reader to have the slash/zero printed as such, to avoid 
confusing zeros with capital "0". Chapter 7's short Program 
prints all zeros with a slash and all lines with 64 
characters. It may be modified to print all > = GT and ail < 
= LT etc., as desired. As it is a teaching program, it may 
be compacted considerably. Try cutting it down by 1/3rd. 

* NOTE- the author, editor, and publisher have done their 
utmost to find and eliminate typographical errors, 
but would very much appreciate hearing from readers 
who find errors we have overlooked. With well over 
1,000,000 bytes of data in this handbook, some have 
surely slipped by us. 
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CliAPTER 5 



-SUMt-lARY OF LEVEL II ROM CALL ADDRESSES IN ALPHABETICAL ORDER- 



This sujixmary includes the coupling CALL addresses for DOS and 
Disk BASIC because they are called from Level II ROM. In 
addition, the link address for BP^AK is included as it may be 
intercepted at 400CH before calling an RST and either rendered 
inoperative or used for whatever purpose the prograiTuner 
wishes. One extra bonus for disk users under the heading 
"MASTER" is the master password "F3CUM," which will allow you 
to access ANY protected file in either DOS or Disk Basic when 
using DOS 2.1, DOS 2.2, or NE';'JDOS+. Thank you Manny Garcia. 
Every lock has a key and "F3GUM" will allow you to LOAD, KILL, 
transfer or do whatever you wish with any disk file/program 
whether SIP (system-invisible-protected) or otherwise. 



BASIC 


HEX CALL 


FUNCTION 


ADDRESS 


ABS 


0977 


ASC 


2A0F 


AUTO 


2008 


CDBL 


OADD 


CINT 


0A7F 


CLOAD 


2C1F 


CLS 


01C9 


CONT 


IDE 4 


CSAVE 


23F5 


CVD 


415E 


CVS 


4158 


DEF 


415B 


DEFINT 


1E0 3 


DEFSTR 


1E00 


DIM 


2608 


ELSE 


1F0 7 


EOF 


4161 


ERR 


24CF 


EXP 


1439 


FIX 


0B26 


FN 


4155 


GET 


417F 


GOTO 


1EC2 


INKEY? 


019D 


INPUT 


219A 


INT 


0B37 


LEFT.? 


2A61 


T,ET 


1F21 


LIST 


2B2E 



BASIC 


HEX CALL 


FUI^CTION 


ADDRESS 


&H 


4194 


ATH 


15BD 


BREAK 


400C 


CHR$ 


2A1F 


CLEAR 


1E7A 


CLOSE 


4185 


CMD 


4173 


COS 


1541 


CSNG 


0AB1 


CVI 


4152 


DATA 


1F05 


DEFDBL 


1E09 


DEFSNG 


1E06 


DELETE 


2BC6 - 


EDIT 


2E50 


END 


1DAE 


ERL 


24DD 


ERROR 


1FF4 


FIELD 


417C 


FOR 


1CA1 


FRE 


27D4 


GOSUB 


1EB1 


IF 


2039 


INP 


2AEF 


INSTR 


419D 


KILL 


4191 


LEN 


2A0 3 


LINE 


41 A3 


LOAD 


4188 
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BASIC 


HEX CALL 


FQi-^CTION 


ADDRESS 


LOG 


4164 


LOG 


0809 


LPRINT 


2067 


MASTER 


F3GUM 


ME RGE 


418B 


r-IKD$ 


4170 


MJCS$ 


416D 


NEV7 


1B49 


NOT 


25C4 


OPEN 


4179 


PEEK 


2CA.z^ 


POKE 


2CBr 


PRINT 


206F 


RANDOM 


01D3 


REM 


1F07 


RESTORE 


1D91 


RESUME 


IFAF 


RND 


14C9 


RUN 


1EA3 


SET 


0135 


SIN 


1547 


STOP 


1DA9 


STRING$ 


2A2F 


TAN 


15A8 


TROFF 


1DF8 


USR 


27FE 


VAL 


2AC5 



BASIC 


HEX CAL 


FUNCTION 

4 


ADDRESS 


LOF 


'4167 


LLIST 


2B29 


LSET 


4197 


MEM 


27C9 


MID? 


2A9A 


MKI$ 


416A 


NAME 


418E 


NEXT 


22B6 


ON 


■1F6C 


OUT 


2AFB 


POINT 


0133 


POS 


27F5 


PUT 


4218 


READ 


21EF 


RESET 


0138 


RETURN 


lEDE 


RIGHT? 


2A91 


RSET 


419A 


SAVE 


41A0 


SGN 


9 8A 


SQR 


13E7 


STR$ 


2836 


SYSTEM 


02B2 


TIME? 


4176 


TRON 


1DF7 


VARPTR 


24EB 



NOTE: If you are doing a considerable air.otmt of assenibly 

language prograniKiing , v;e suggest you you Xerox these 
two pages and paste-up a single sheet with the entire 
CALL functions and addresses on it as they would not 
fit on a single typed page. 



* footnote; 



ELSE = 1F07 hex is questionable even though ROM 
points to this address. ROM also points to 1F07 
for the REM function which appears correct. It 
may be only an improperly shadow-masked bit on 
this particular Level II ROM chip. 
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0000 

0010 

0020 

30 

0040 

0050 

0060 

0070 

0080 

0090 

OOAO 

OOBO 

OOCO 

OODO 

OOEO 

OOFO 

0100 

0110 

0120 

0130 

0140 

0150 

0160 

0170 

0180 

0190 

01A0 

OIBO 

OICO 

OIDO 

OIEO 

OIFO 

0200 

0210 

0220 

0230 

0240 

0250 

0260 

0270 

0280 

0290 

02A0 

02B0 

02C0 

02D0 

02E0 

02F0 



F3AF 
C303 
C30 9 
C30F 
C3D9 
ODOD 
0B78 
0000 
21E5 
0106 
15 36 
8F1B 
D7B7 
BE70 
8F46 
CEFF 
A72 8 
0052 
454C 
A219 
FE8 
16FF 
1F5 7 
4F7A 
2810 
18F9 
9940 
3CCD 
2141 

0B10 

CD21 

2 3 3E 

1E3D 

FF3A 

0A32 

C9C5 

7610 

C9CD 

5730 

10FE 

A518 

2A32 

F801 

CDB3 

02CD 

2BE 

B8FE 



C374 
40C5 
4 0C5 
401 1 
5C9 
1F1F 
B120 
C3CC 
4136 
1C21 
C923 
CDC 9 
2012 
28F3 
773E 
22B1 
C319 
4144 
2049 
D7;^J 
D2 4A 
14D6 
7B1F 
F6 3C 
12 FA 
A1C6 
B720 
5728 
3E03 

FE21 
0206 
0020 
3 2E4 
3D40 
3F3C 
F5DB 
FEDB 
6402 
OBCD 
18F2 
D1CD 
3E3C 
CDE2 
IBDA 
3502 
20ED 
3C20 



06C3 
0601 
0604 
1D40 
0000 
0101 
FBC9 
0611 
3A2 3 
5241 
2323 
0121 
214C 
1811 
7020 
4019 
1A4D 
494F 
4920 
013E 
1EF5 
0330 
5F10 
571A 
8F01 
FF9F 
06CD 
F12A 
32AF 

SF3Z 
02FC 

5C10 

ODCD 

37E5 

A4B5 

C9C5 

FF17 

FF47 

E5C5 

D901 

CDFE 

FE01 

323F 

41 31 

CC06 

FE55 

2310 

F5CD 



oa4o 

182E 

181E 

18E3 

C3C2 

5B1B 

3100 

8040 

70 2 3 

36C3 

10F9 

0501 

4 32 3 

CD5A 

CE2B 

22A0 

454D 

2053 

4241 

8001 

CF2C 

FBCC 

F879 

B7FA 

792F 

E5CD. 

5803 

D440 

40E1 

CD21 
FEC9 
012B 
2104 
D3FF 
E506 
30FB 
F1CB 
D5F5 
0D20 
0106 
E5.AF 
3CE1 
8842 
D7CA 
20F9 
F3CD 
3502 



C300 
C306 
C30C 
C312 
03CD 
OAIA 

6 3 A 
21F7 
36 2C 
2 3 73 
21E8 
CDA7 
7CB5 
1EB7 

1 1 14 
40CD 
4F5 2 
4841 

5 3 4 9 
3E01 
CD1C 
3 4F 
8F3C 
7C01 
4F1A 
8D09 
B728 
77C3 
C93E 

a I U 
0206 
E5 21 
CF2C 
FFCD 
323D 
08CD 

06 4 1 
1017 
0E08 
F2F1 
FFAF 
CD41 
C9CD 
CDFE 
9719 
0606 
2C02 
47CD 



40E1 
40C5 
401 1 
401 1 
2B00 
0818 
EC 3 7 
1801 
2322 
2372 
4270 
28CD 
281B 
C297 
44DF 
4D1B 
5920 
434B 
430D 
F5CF 
2BFE 
F187 
4 7AF 
3E80 
All 2 
E118 
1 1F5 
8428 
1CCD 



E9C3 

0602 

1540 

2540 

B7C0 

0919 

3CFE 

2 70 

A740 

2310 

31F8 

B31B 

7E4 7 

19E3 

DA 7 A 

21 1 1 

5349 

204C 

OOIE 

2 8CD 

30D2 

5F06 

378F 

47F1 

CF29 

EFD7 

AF32 

2128 

3A0 3 



0B10 FE21 



OOFB 

7BA2 

2102 

40C9 

4102 

10FE 

F5CD 

5 7CD 

D1C1 

CD64 

02FE 

1403 

2 3E 

FE2F 

7EB7 

CD35 

1403 



181B 
C602 
E1C9 
3A3F 
10FB 
CD1E 
1E02 
D901 
E1C9 
0210 
A520 
2 2DF 
2ACD 
284F 
2809 
02FE 
85 4F 



9F0 6 

1826 

18E3 

18DB 

18F9 

2020 

02D2 

EDBO 

1 12D 

F706 

41 CD 

38F5 

2F77 

2B3E 

1911 

01CD 

5A45 

4 5 56 

2CC3 

1C2B 

4A1E 

2 7A 

10FD 

B778 

C9B1 

E5 3A 

9940 

1922 

3E1F 

OOFC 
7ED6 
D24A 
2100 
3CEE 
E1C1 
0206 
F1C1 
7A0 7 
06 87 
FB3E 
F93E 
40CD 
2A0 3 
CD93 
CD35 
7828 
CD35 






@..@ 

. . ,@ ^ 



. . @ . . @ . • • • @ ' ^ @' • • 
. . . + 



1 



7<. . . 



!.A6:#. #6, #".§.- 

... I RA6 .TT.1T.Tr... 

.6.ttt:it..!.B.1.A. 

!.... (..,.8. 

. . . . ! LC Tr . • ( « . 0/ . 

..(.... Z +> 

F + n 

..".@.".@.M. ! . .. 
. (. . .MEMORY. SIZE 
.RADIO. SHACK. LEV 
EL. II. BASIC. . . , 

««•« •U»««L/» a • a 
• '<««•« aanV, \j « / » 

0. .<W. . , . , >,G. 



. ca X . . ( . . 

<. v? (.*.(§... ( 

IA>.2.3. .>. . 



= 2 7! I 

a ^-a/aiava** 

o« Ca8«»-!--sr-Ca 

■ ^.Va« a a a a/A-o 

« a 'J a a £i. « « 

a w « « o 



'70. 



9 4 9 9 



a a ft • a 



» « s a B jt'\ 

*2><2?<. . . 

a a ft a ix I a O a a 



. .> 
. .> 

. " . (a . 

s* * 

-^ a a 

/(O.. 

•la— ^aaUaoaaaa V'l*--' 
**«alTa*a/aB--^aaa V 
« e\a « • ^ » \J * a a evJaZ ) 



( 
.> 



. .J 
I 

• * 

?< 



TRS-80 DISASSEMBLED HANDBOOK- 



PAGE 3 8 



0300 


0277 


2 381 


4F10 


F7CD 


3502 


B928 


DA3E 


4332 


0310 


3E3C 


18D6 


CD35 


026F 


CD35 


0267 


C9EB 


2ADF 


0320 


40EB 


D7C4 


5A1E 


203A 


EBE9 


C5 4F 


CDC1 


413A 


0330 


9C40 


B7 7 9 


CI FA 


6402 


2062 


D5CD 


3300 


F5CD 


0340 


4803 


32A6 


40F1 


D1C9 


3A3D 


40E6 


083A 


2040 


0350 


2803 


0FE6 


1FE6 


3FC9 


CDC 4 


41D5 


CD2B 


OODI 


0360 


C9AF 


3299 


4032 


A640 


CDAF 


41C5 


27vA7 


4006 


0370 


FOOD 


D9 5 


F548 


0600 


0936 


002A 


A7 4 


F1C1 


0380 


2BD8 


AFC 9 


CDS 8 


03B7 


C018 


F9AF 


329C 


403A 


0390 


9B40 


B7C8 


3E0D 


D5CD 


9C03 


D1C9 


F5D5 


C5 4F 


3A0 


1E00 


FEOC 


2810 


FEOA 


2003 


3E0D 


4FFE 


0D28 


03B0 


5 3A 


9B40 


3C5F 


7B3 2 


9B40 


79CD 


3B0O 


CIDI 


3C0 


F1C9 


E5DD 


E5D5 


DDE1 


D521 


DD0 3 


E5 4F 


lAAO 


3D0 


B8C2 


3340 


FE02 


DD6E 


01DD 


6602 


E9D1 


DDE1 


03E0 


E1C1 


C921 


3640 


0101 


3816 


OOOA 


5FAE 


7 3A3 


03F0 


2008 


142C 


CB0 1 


F2EB 


03C9 


5F7A 


0707 


0757 


0400 


0E01 


7 9 A3 


2005 


14CB 


0118 


F73A 


8038 


4 7 7A 


0410 


C640 


FE60 


3013 


CB08 


3031 


C620 


573A 


4 38 


0420 


E610 


2828 


7AD6 


6018 


22D6 


70 30 


10C6 


40FE 


0430 


3C3 8 


02EE 


10CB 


0830 


12EE 


1018 


0E07 


CB08 


0440 


30Q1 


3C2 1 


5000 


4F06 


0009 


7E57 


01 AC 


ODCD 


0450 


6vV/ 


7AFE 


1 CO 


EFC9 


DD6E 


3DD 


6604 


383A 


0460 


DD7E 


05B7 


2801 


7779 


FE20 


DA0 6 


05FE 


8030 


0470 


35FE 


4038 


08D6 


40FE 


20 3 8 


02D6 


20CD 


4105 


0480 


7CE6 


03F6 


3C6 7 


56DD 


7E05 


B72 8 


05DD 


7205 


0490 


36 5F 


DD75 


03DD 


7404 


79C9 


DD7E 


05B7 


C07E 


04A0 


C9 7D 


E6C0 


6FC9 


FECO 


3 8D3 


D6C0 


28D2 


4 7 3E 


04B0 


20CD 


4105 


10F9 


18C8 


7EDD 


7705 


C9AF 


18F9 


04C0 


2100 


3C3A 


3D40 


E6F7 


32 3D 


4 0D3 


FFC9 


2B3A 


04D0 


3D40 


E608 


2801 


2B36 


20C9 


3A3D 


40E6 


08C4 


04E0 


E204 


7DE6 


3F2B 


C01 1 


4000 


19C9 


237D 


E63F 


04F0 


coil 


COFF 


19C9 


3A3D 


40F6 


0832 


3D40 


D3FF 


0500 


237D 


E6FE 


6FC9 


1180 


4D5 


FE08 


28C0 


FEOA 


0510 


D8FE 


0E38 


4F28 


A1FE 


0F2 8 


A2FE 


172 8 


D7FE 


0520 


1828 


B7FE 


1928 


C5FE 


1A28 


BCFE 


1B28 


C2FE 


0530 


1C2 8 


8DFE 


1DCA 


A104 


FE1E 


2837 


FEIF 


2 8 3C 


0540 


C977 


2 3 3A 


3D40 


E608 


2801 


237C 


FE40 


coil 


0550 


COFF 


19E5 


1 100 


3C2 1 


403C 


C501 


C003 


EDBO 


0560 


C1EB 


1819 


7DE6 


C06F 


E511 


4000 


197C 


FE4 


0570 


28E2 


D1E5 


5 4 7D 


F63F 


5F13 


1804 


E5 11 


0040 


0580 


3620 


2 3 7C 


BA20 


F97D 


BB20 


F5E1 


C979 


B728 


0590 


40FE 


0B28 


OAFE 


0C20 


1BAF 


DDB6 


0328 


15DD 


05A0 


7E03 


DD96 


0447 


CDDI 


0520 


FB3E 


0A3 2 


E837 


05B0 


10F4 


1818 


F5CD 


D105 


20FB 


F132 


E837 


FEOD 


5C0 


CODD 


3404 


DD7E 


04DD 


BE03 


79C0 


DD36 


0400 


05D0 


C93A 


E837 


E6F0 


FE30 


C9E5 


3E0E 


CD 3 3 


0048 


05E0 


CD49 


OOFE 


2030 


2 5FE 


ODCA 


6206 


FEIF 


2829 


05F0 


FE01 


286D 


1 lEO 


05D5 


FE08 


2 834 


FE18 


282B 
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0600 


FE0 9 


2842 


FE19 


2839 


FEGA 


CODi 


7778 


0610 


CF7E 


23CD 


3 30 


0518 


C7CD 


C901 


41E1 


0620 


E005 


CD30 


6 2B 


7E23 


FEOA 


C878 


B920 


0630 


78B9 


C82B 


7EFE 


0A2 3 


C62B 


3E0 8 


CD33 


0640 


C93E 


1 7C 3 


3300 


CD48 


03E6 


072F 


3CC6 


0650 


7 8B7 


C8 3E 


2077 


23D5 


CD33 


OODI 


051D 


0660 


EF37 


F53E 


0D77 


CD33 


3E 


OFCD 


3300 


0670 


47F1 


E1C9 


D3FF 


21D2 


6 11 


0040 


01 36 


0600 


B03D 


3D2 


F106 


2712 


1310 


FC3A 


4038 


0690 


C275 


0031 


7D40 


3Arc 


3 7 3C 


FE02 


DA 7 5 


06A0 


0132 


E 1 3 7 


21 EC 


3711 


EF37 


3 60 3 


0100 


06B0 


6000 


CB46 


2 EC 


AF32 


EE37 


0100 


4 2 3E 


6C0 


CB4E 


2 8FC 


1A02 


0C20 


F7C3 


0042 


0118 


06D0 


AE19 


C396 


1CC3 


7610 


C390 


ICC 3 


D925 


C6E0 


00C9 


^ VVs* 


FBC9 


0001 


E30 3 




004B 


06F0 


5804 


3C 


0044 


4F0b 


8D05 


4 300 


0050 


0700 


0050 


C700 


003E 


00C9 


2180 


13CD 


C209 


0710 


CDC2 


09CD 


8209 


78B7 


C83A 


2441 


B7CA 


0720 


9 30 


0C2F 


3CEB 


CDA4 


09EB 


CDB4 


09C1 


0730 


19D0 


F5CD 


DF09 


67F1 


CDD7 


07B4 


2121 


0740 


5407 


CDB7 


07D2 


9607 


2 3 34 


CAB 2 


072E 


0750 


E307 


1842 


AF90 


477E 


9B5F 


2 37E 


9A57 


0760 


994F 


DCC3 


0758 


6 3?iF 


4 7 7 9 


B720 


184A 


0770 


6F78 


.06 8 


FEEO 


2 0F0 


AF32 


2441 


C905 


0780 


1757 


798F 


4FF2 


7D07 


7 8 5C 


45B7 


2808 


0790 


4186 


7730 


E3C8 


7821 


2441 


B7FC 


A807 


07A0 


7EE6 


80A9 


4FC3 


B409 


1CC0 


14C0 


OCCO 


07B0 


34C0 


1E0A 


C3A2 


197E 


8 3 5F 


2 3 7E 


8A5 7 


07C0 


894F 


C921 


2541 


7E2F 


7 7AF 


6F90 


477D 


07D0 


7D9A 


577D 


994F 


C906 


00D6 


8 38 


0743 


07E0 


OEOO 


18F5 


C609 


6FAF 


2 DC 8 


79 IF 


4F7A 


07F0 


7B1F 


5F78 


1F47 


1 8EF 


0000 


0081 


3A-A 


0800 


80F1 


2276 


8045 


AA3 8 


8 2CD 


55 9 


B7EA 


0810 


2124 


4 17E 


0135 


801 1 


F304 


90F5 


70D5 


0820 


1607 


C1D1 


04CD 


A208 


21F8 


07CD 


1007 


0830 


07CD 


9A14 


0180 


8011 


0000 


CD16 


07F1 


0840 


0F01 


3180 


1118 


7 2cn 


5509 


C82E 


OOCD 


0850 


7932 


4F41 


EB22 


5041 


0100 


0050 


5 82 1 


0860 


E521 


6908 


E5E5 


2121 


417E 


23B7 


2824 


0870 


08 IF 


6779 


300B 


E52A 


50 4 1 


1 9EB 


E 1 3 A 


0860 


891F 


4F7A 


1F57 


7B1F 


5F7 8 


IF 4 7 


2D7C 


0890 


E1C9 


'o5A 


514F 


C9CD 


A4 9 


21D8 


ODCD 


u8A0 


C1D1 


CD5 5 


9CA 


9A19 


2EFF 


CD14 


0934 


08B0 


7E32 


S 9 4 


2B7E 


3285 


402B 


7E32 


8140 


08C0 


AF4F 


5 7 5F 


3 2 8C 


40 E 5 


C57D 


CD30 


40DE 


08D0 


3 07 


32SC 


40F1 


F137 


D2C1 


E179 


3C3D 


U8E0 


9707 


177B 


17 5F 


7A17 


B233 


17^1- 


x>l73 

E521 


u8F0 


3A8C 


4 01 7 


328C 


4079 


^OCB 



B728 
E5C3 
F3C9 
0004 
085F 
C818 
7990 
OOED 
E604 
3E 
OOCD 
8C77 
1AC3 
CSOO 
4907 

5 2C3 
1806 
B409 
D1FE 
41F2 
01CD 
2 3 7E 
5465 
297A 
2124 
4623 
0E80 
2 3 7E 
9B5F 
5A51 
1F57 
5619 
4A1E 
C5CD 
21FC 
CD89 
1409 

6 50 7 
E52E 
4F41 
20E1 
B109 
342B 
4 1EB 
003F 
1FFA 

2441 



,A.1> A 

. . . 0.+ 

#.+>. .3 

H. . ./<• 
. .3 

3 > 3 

...(§. 6 
.. . :@8 



.7.>. . 

(a • • • a « 



. . .1 .@ 
.2.7!. 

• • • .t a a 

.N( 



X. .<.D0 
.P. . .> 

.0./< 

T 



,0, 



W. 



A 



4 
.0. 



B. 



$A 









0. 





G 



%A 
.0 



20A. "r 



0. 



7< 

. 76 . . . 
2.7. .B> 

■ a ■ X-J a • 

% 

K I 

. .C. .PR 
I 

• • s a • a > 

. :?A. . . 

• a • a a a a 



CZQO 
.U. . 
.2. @+.2 
.0W.2. @ 
. 2 . Ca . . 

a • a a a a a 

: .@.2.@ 



> 



! !A 

#4 

. .#..V7# 
G JT 

.2$A. . ) 
. .E. (. i$ 

$A .... Fir 



/aaaa^aa 

. , . 8.CZQ 
- n I 

. . . v^ . « » 

V 

8. .u:. .J 



u, 



A. . .PXl . 
A.#. ($. 
PA. . . :0A 

a « • O "" a a 

I 

a « • a a a a 

a a aa aT^' 

@+.2. @A 
....§.. 

* It * 9 ^ • 

W, .0) . .G 

a a a a a * -^ -^ 



TRS-80 DISASSEMBLED HANDBOOK 



PAGE 4 



0900 

0910 

0920 

0930 

0940 

0950 

0960 

0970 

0980 

0990 

09A0 

09B0 

09C0 

09D0 

09E0 

09F0 

OAOO 

OAIO 

0A20 

0A30 

OA40 

0A50 

0A60 

0A7O 

0A80 

0A90 

OAA.O 

OABO 

OACO 

O/vDO 

OAEO 

OAFO 

OBOO 

0B10 

0B20 

0B30 

0340 

0B50 

0B60 

0B70 

0B80 

0B90 

OBAO 

OBBO 

OB CO 

OBDO 

OBEO 

OBFO 



3 5E1 

AE4 7 

AS 7 8 

C9CD 

0978 

34C0 

9FC0 

2336 

F60A 

6 7C3 

C87C 

C9CD 

2141 

1805 

2341 

4F1F 

D30 9 

0921 

CD2 6 

BECO 

C260 

2E41 

4FC3 

0A13 

2A21 

41FE 

AF4 

ESE7 

B7C8 

EFOA 

FCCC 

4C3 

C8E5 

CDD7 

7;^„^3 

09CD 

2124 

73F5 

7F0A 

B721 

DF09 

CD69 

21 ID 

2812 

273D 

180 3 

0AC5 

8F0F 



20C3 

2E00 
F236 
5 5 9 
B7C8 
C3B2 
3CC9 
8017 
2 123 
9A0A 

1 8BB 
C209 
5E2 3 
EB3A 
7E07 
AEC9 
D51 1 
5E09 
OAIF 
2B7B 
097D 
1AB7 
2123 

2 BO 5 
41F8 
9030 
C901 
EOFA 
CDDF 
7C55 
0A21 
9F0A 
CD3F 
077C 
3CC0 

3 7 OB 

4 17E 
7917 
2014 
0080 
Aii;2B 
0DF1 
4 17E 
3E10 
20F0 
7C17 
EBCD 
7C3 5 



C3B2 

78B7 

09C6 

2FE1 

C602 

073A 

0688 

C362 

417E 

E7CA 

EB2A 

EB22 

5623 

AF40 

371F 

2127 

2141 

E5CD 

A3 C9 

96C0 

9 3C2 

CASS 

41AE 

20Fd 

CAF6 

OECD 

8090 

ceo A 

0921 

lEOO 

0000 

E7C8 

09CD 

17DC 

0BC9 

C3 7B 

FE9 8 

CD62 

4F23 

CA9A 

36B8 

FC2 

3537 

2 9 DA 

EBEl 

9F47 

CFOA 

CA9A 



073E 
281F 
8077 
B7E1 
DAB 2 
2441 

1 100 
07CD 
EE3 
F6 0A 
2141 
2141 
4E23 
471 A 
773F 
411 1 
E7D3 
5509 

2 378 
ElEl 
6009 
0921 
79F8 
C1C9 
0AD4 
FBOA 

1 100 
CAF6 
2041 
0690 
221D 
1E18 
DH 9 
A807 
E7F8 
09E7 
3A21 
07F1 
7EEE 
0A79 
F5FC 
ODAF 

2 32 8 
3D27 
C97C 
E5 7A 
F1E1 
0AE5 



FF2E 

7D21 

CA90 

F278 

0747 

B7C8 

0021 

9409 

77C9 

F25S 

E3E5 

6069 

4623 

7713 

1F23 

D209 

11 ID 

79C8 

BECO 

C97A 

C921 

5E09 

13 23 

CD4F 

B90A 

EBDl 

OOCD 

OACD 

46C3 

C369 

4122 

C3A2 

AE6 7 

0600 

CDS 5 

F830 

41D0 

C921 

8006 

FEB8 

A003 

32 1C 

FAC9 

ES29 

179F 

179F 

CDA4 

D5CD 



AF21 

2441 

08CD 

07C3 

CD16 

3A23 

2441 

F0E7 

CD94 

9 2A 

2A23 

2223 

C91 1 

2305 

2 3 77 

1806 

41C9 

2123 

2379 

AC7C 

2741 

E5CD 

0608 

0AC2 

21B2 

2221 

OCOA 

BF09 

9607 

09E7 

1F41 

1947 

FC1F 

DCC3 

09F2 

1E28 

7ECD 

2441 

0623 

D0F5 

2123 

41F1 

E521 

E3 30 

4 7CD 

1988 

09E3 

4 5 0C 



2D41 

AE80 

DF09 

3207 

0721 

41FE 

4F70 

FA5B 

096F 

2141 

41E3 

41EB 

2141 

20F9 

7907 

2127 

7837 

41AE 

BECO 

FA5F 

CDD3 

5509 

1A96 

5E09 

07E5 

413E 

C061 

CDEF 

2A21 

DOCA 

3E08 

4F5 7 

03 3E 

07E1 

3 7 OB 

39CD 

FBOA 

7EFE 

B6 05 

CDBF 

413E 

D0C3 

0409 
51 OC 
OFAC 
CD6B 
C544 



4E23 
471F 
7723 
CDBF 
2441 
2F17 
0600 
OCCA 

1 79F 
7C35 
E5E3 
C921 
0604 
C921 
371F 
41 1 1 
CAS 5 
79F8 
2B7A 
9BA 
0911 
1B1A 
C223 
C9E7 
3A24 
0232 
6A18 
0A78 
41CD 
F60A 
013E 
SEE 7 
9890 
C91B 
CD82 
SEOA 
3698 
9 DA 

2 0FB 
9 CD 
3890 
D80C 

DA3D 
7998 
F299 
0CC3 
4D21 



#6 



!A. 

#A, 




.A. 
O 



u 



+ 



+ 



A 



< 



7 
$A 



/ 



A 



> 



(.. 



$A, 



* I A 

. " ! A . 

V|}H#F 
.@G 
7. . 
! 'A 
!A. 
U 



.U 

A 



U. 



0+ 



. !-AN# 
$A, .0. 
+ 



. . . !$A 

:#A./. 
$A0. 



U.*!A 

*#A. 

"^A. 

#. . lA 

#. . . 

n. . .7. 
.. ! 'A. 
A U 

!#A. . . 



x\ • • a • 

. .U. . . 



tr . 
0. 



!...:$ 
" !A>.2 



AF. 



*IA. 



A" . A>. .> 
. . . GOI-: 

r. . . .> 



u, 



a U • \ « • * 

A 6 

. !$A. . . 

a • « T" • « a 



, . !#A>. 

jL a t\ a a a « 

A.5.#(...!.... 
(.>.) . = ' .) .0. . .= 

6aaaaO»^««» 
«eaaavj*«aa»aa««« 
««aaaoaaaaatt*«Bi> 

F DM ' 

ea«oa«o*aB i-^ * a t~^ L i « 



TRS-80 DISASSEMBLED HANDBOOK 



PAGE 41 



ocoo 


PiU 


.'\c\^^ 


2938 


IFEB 


2 9EB 


30 04 


09DA 


260C 


0C10 


3D2 


F1C1 


D17C 


B7FA 


1F0C 


D178 


C34D 


OCEE 


0C20 


BOBS 


2 813 


EB01 


C1E1 


CDCF 


Oi^JEl 


CDA4 


9 CD 


0C30 


CEO A 


C1D1 


C3 4 7 


0878 


B7C1 


?T'3 A 


0AD5 


CDCF 


0C40 


0AD1 


C3 8 2 


097C 


AA4 7 


CD4C 


OCEB 


7CB7 


F29A 


0C50 


0A.=.F 


4F95 


6F79 


9C67 


C39A 


0A2A 


2141 


CD51 


0C6 


0C7C 


EE80 


B5C0 


EBCD 


EFOA 


AF0 6 


98C3 


6 909 


0C70 


212D 


4 17E 


EE80 


7721 


2E41 


7EB7 


C847 


2B4E 


0C80 


1124 


411 A 


B7CA 


F409 


9030 


162F 


3CF5 


0E08 


0C90 


23E5 


1A4 6 


7778 


121B 


2B0D 


20F6 


E146 


2B4E 


OCAO 


FIFE 


3 9 DO 


F5CD 


DF09 


2336 


0047 


F121 


2D41 


OCBO 


CD 6 9 


0D3A 


2641 


321C 


4178 


B7F2 


CFOC 


CD33 


OCCO 


0DD2 


OEOD 


EB34 


CZvB2 


07CD 


900D 


C30E 


ODCD 


OCDO 


450D 


2125 


4 IDC 


570D 


AF4 7 


3A2 3 


41B7 


201E 


OCEO 


211C 


4 10E 


0856 


7 77A 


230D 


20F9 


78D6 


08FE 


OCFO 


C020 


E6C3 


7807 


0521 


1C41 


CD97 


0BB7 


F2F6 


ODOO 


0C7 8 


B728 


0921 


2441 


8677 


D278 


07C8 


3 Ale 


ODIO 


41B7 


FC20 


0D21 


2541 


7EE6 


802B 


2BAE 


77C9 


QD20 


21 ID 


4106 


0734 


C02 3 


0520 


FA3 4 


CAB2 


0723 


0D30 


36 8 


C921 


2741 


1 11D 


410E 


7AF 


1A8E 


1213 


0D40 


230D 


20F8 


C9 21 


2741 


1 1 ID 


4 10E 


7AF 


1A9E 


0D50 


1213 


230D 


20F8 


C97E 


2F77 


211C 


4106 


8AF 


0D60 


4F79 


9E77 


230 5 


20F9 


C9 71 


E5D6 


0838 


0EE1 


0D70 


E511 


0008 


4E73 


5 9 2B 


15 20 


F918 


EEC6 


0957 


0D80 


AFEl 


15C8 


E51E 


087E 


1F7 7 


2B1D 


20F9 


1 8F0 


0D90 


212 3 


4116 


0118 


EDOE 


087E 


1777 


230D 


20F9 


ODAO 


C9CD 


5509 


C8CD 


0A09 


CD39 


0E71 


1306 


071A 


ODBO 


133 7 


D528 


17 0E 


8C5 


1F47 


DC 3 3 


ODCD 


900D 


ODCO 


7 8C1 


0D20 


F2D1 


0520 


E6C3 


D80C 


2123 


41CD 


ODBO 


700D 


18F1 


4^^M (///«• 


i-iH' 


■'L'i'^f 11D4 


0D21 


ODEO 


2741 


CDD3 


09JA 


2E41 


B7CA 


9A19 


CD07 


0934 


ODFO 


34CD 


390E 


2151 


4171 


41 1 1 


4A41 


2127 


41CD 


GEOO 


4B0D 


1A99 


3F38 


0B11 


4A41 


2127 


41 CD 


390D 


0E10 


AFDA 


1204 


3A2 3 


413C 


3D1F 


FA1 1 


0D17 


211D 


0E20 


410E 


07CD 


990D 


214A 


41 CD 


970D 


78B7 


20C9 


0E30 


2124 


4135 


2 0C3 


C332 


0779 


322D 


412B 


1150 


0E40 


4101 


0007 


7E12 


711B 


2B05 


20F8 


C9CD 


FC09 


0E50 


EB2B 


7EB7 


C8C6 


02DA 


B207 


7 7E5 


CD77 


OCEl 


0E60 


34C0 


C3B2 


07CD 


7807 


CDEC 


0AF6 


AFEB 


OIFF 


0E70 


0060 


68CC 


9A0A 


EB7E 


FE2D 


F5CA 


830E 


FE2B 


0E80 


2801 


2BD7 


DA2 9 


OFFE 


2ECA 


E40E 


FE4 5 


2814 


0E90 


FE2 5 


CAEE 


OEFE 


2 3CA 


F50E 


FE21 


CAF6 


OEFE 


OEAO 


4420 


2 4B7 


CDFB 


0EE5 


21BD 


0EE3 


D715 


FECE 


OEBO 


C8FE 


2DC8 


14FE 


CDC8 


FE2B 


C8 2B 


F1D7 


DA9 4 


OECO 


0F14 


2 03 


AF9 3 


5 FES 


7B90 


F40A 


OFFC 


180F 


OEDO 


20F8 


E1F1 


E5CC 


7B09 


E1E7 


E8E5 


2190 


OSES 


GEEO 


CDA3 


0AC9 


E70C 


2 0DF 


DCFB 


0EC3 


830E 


E7F2 


OEFO 


9719 


2318 


D2B7 


CDFB 


0E18 


F7E5 


D5C5 


FSCC 



,.>,)8,.),0..,&. 
= M. . 

.. ( 

G 

G.L 

. .0 * lA.Q 

1-A. . . . i .A. . .G+N 
#..F. ...+.... F+N 

« •!7« • • • • irD»ijj« .""/t. 

• « • l0</~\^« .O. « « • • • a O 

4 

E. !%A.U. .G:#A. . . 

!.A. .V. .# 

! .A 

! . A . . 4 . # . . . 4 . . . + 

fi I • A A 

# I ' A A 

• •^•••••/■i *• jH • ft n 

n •" R 

\J « asTr«»«ft«*fto'<-'«o 
4- 

ISA # 

. UA. 

I 

' A. . . : .A 4 

4.9. IQA.A. JA! 'A. 
K. . .?8. , JAf'A.9, 
. J- A<= ' 

A IJA 

1$A5 2-A+,P 

i\ ««fto*«*'t'« «aft»«o 
«(ftoa»a«a Bo»ft«ft« 

4 

% S 

o u a « • • tT 

D.$. 

»• aaa«aoi«i< 



a a a « a a a 



oaaaiooo 
aooeoooa 
ao?oo9oaoBO«»«as 



aaaaaaoa 



a a a • 



TRS-80 DISASSEMBLED HA2^DB00K PAGE 42 



4 



OFOO BIOA F1C4 DBOA CiDl ElC9 C8F5 E7F5 E43E , .•> 

0F10 09F1 EC4D OEFl 3DC9 D5E5 F5E7 F5E4 9700 ...M..= 

0F20 F1EC DCOD FlEl D13C C9D5 7889 47C5 E57E < G. . . 

0F30 D630 F5E7 F25D 0F2A 2141 11CD OCDF 3019 .0 * !A 0. 

0F40 545D 2929 1929 F14F 097C B7FA 570F 2221 T.)).).0 W."l 

0F50 41E1 CIDI C383 0E79 F5CD CCOA 3730 1801 A 70.. 

0F60 7494 1100 24CD OCOA F274 OFCD 3E09 FiCD ....$ >.•• 

0F70 890F 18DD CDE3 OACD 4D0E CDFC 09F1 CD64 M 

0F80 09CD E30A CD77 OCI 8 C8CD A409 CD64 09C1 

0F90 D1C3 1607 7BFE 0A30 0907 0783 0786 D630 

OFAO 5FFA 1E32 C3BD 0EE5 2124 1 9CD A728 ElCD ... 2 .... 1 ?...(. . 

OFBO 9A0A AFCD 3410 B6CD D90F C3A6 28AF CD34 4 {. .4 

OFCO 10E6 0828 0236 2BEB CD9 4 09EB F2D9 0F36 ...(.6+ 6 

OFDO 2DC5 E5CD 7B09 EICI B423 3630 3AD8 4057 - #60:. @W 

OFEO 173A AF40 DA9A 1 OCA 9210 FE04 D23D 1001 .:.@ = •• 

OFFO 0000 CD2F 1321 3041 460E 203A D840 5FE6 .../.! OAF. .:. @ . . 

1000 2028 0778 B90E 2A20 0141 71D7 2814 FE45 .( *..A..(..E 

1010 2810 FE44 280C FE30 28F0 FE2C 28EC FE2E (.. D (.. (..,(.. . 

1020 2003 2B36 307B E610 2803 2B36 247B E604 . .+6 . , . ( . +6 $ . . . 

1030 C02B 70C9 32D8 4021 3041 3620 C9FE 05E5 .+.,2.@!0A6 

1040 DEOO 1757 14CD (^liZ- <P I ^^^ (py'^^^'pl^S^ 1^1 f • • -W W. . 

1050 BA30 043C 473E 02D6 02El F5CD 9112 3630 .0,<G> 60 

1060 CCC9 09CD A4 1 2 2B7E FE30 28FA FE2E C4C9 ...... + ..0( 

1070 09F1 281F F5E7 3E22 8F77 23F1 362B F285 ..(...>"..#. 6+. . 

1080 1036 2D2F 3C06 2F04 D60A 30FB C63A 2370 . 6-/<./, . . . . : # . 

1090 2377 2336 OOEB 2130 41C9 23C5 FE04 7AD2 #.#6..10A.# . 

10A0 0911 IFDA A311 0103 06CD 8912 Dl 7A D605 ........o 

10B0 F469 12CD 2F13 7BB7 CC2F 093D F469 12E5 / /.= 

loco CDF5 OFEl 2802 7023 3600 212F 4123 3AF3 (..#6.!/A#:. 

10D0 4095 92C8 7EFE 2028 F4FE 2A28 F02B E5F5 @ (..*(. + .. 

10E0 OIDF 10C5 D7FE 2DC8 FE23 C8FE 24C8 ClFE .. -..+,.$... 

10F0 3020 0F23 D730 0B2B 012B 77Fl 28FB C1C3 ..#. .+.+..(.. . 

1100 CEIO F128 FDE1 3625 C9E5 IFDA AAl 1 2814 ...(.. 6% .. r, ..( . 

1110 1184 13CD 490A 1610 FA32 llEl CiCD BDOF ....I 2 

1120 2B36 25C9 010E B6 1 1 CAlB CDOC 0AF2 IBII +6% 

1130 1606 CD55 09C4 0112 ElCl FA57 1 1 C5 5F78 ...U W 

1140 9293 F469 12CD 7Dl2 CDA4 12B3 C477 12B3 

1150 C491 12D1 C3B6 1 05F 79B7 C416 0F83 FA6 2 

1160 11AF C5F5 FC18 OFFA 6411 C17B 90C1 5F82 

1170 7SFA 7F11 9293 F469 12C5 CD7D 1218 11CD 

1180 6912 79CD 9412 4FAF 9293 CD69 12C5 474F .. ..GO 

1190 CDA4 12C1 B120 032A F340 833D F469 1250 ,.,..,.*. @ .=... P 

11A0 C3BF 10E5 D5CD CCOA DiAF CABO 11 IE 1001 

11B0 IEOd CD55 0937 C401 12E1 C1F5 79B7 F5C4 ...U.7 

11C0 160F 804F 1P£^ 04FE 019F 5781 4F93 F5C5 ...0 W.O... 

IIDO FC18 OFFA D011 ClFl C5F5 FADE 1 1 AF 2F3C /< 

11E0 803C 8247 OEOO CDA4 12F1 F471 12C1 FICC .<.G... 

11F0 2F09 F138 0383 9092 C5CD 7410 EBDl C3BF /., 8 .,.,.,...., . 



TRS-80 DISASSEJ'ELED HANDBOOK PAGE 4 3 



1200 


10D5 


AFF5 


E7E2 


2212 


3A2 4 


4 1FE 


9 1D2 


1210 


1164 


1321 


2741 


CDD3 


9CD 


AIOD 


F1D6 


1220 


18Ed 


CD4F 


12E7 


3003 


014 3 


9111 


F94F 


1230 


0A1B 


0611 


6C13 


CD49 


0AF2 


4B12 


F1CD 


1240 


F518 


E2F1 


CD 18 


0FF5 


CD4F 


12F1 


B7D1 


1250 


EASE 


1201 


7 4 94 


1 1F8 


23CD 


OCOA 


1806 


1260 


13 CD 


490A 


E1F2 


4 312 


E9B7 


C8 3D 


3b30 


1270 


F920 


04C8 


CD9 1 


1236 


3023 


3D10 


F67B 


1280 


4 7 3C 


Do03 


3 0FC 


C6 05 


4F3A 


D840 


E640 


1290 


C9 5 


2008 


362E 


22F3 


4 23 


4 8C9 


ODCO 


12A0 


230E 


03C9 


D5E7 


E2EA 


12C5 


E5CD 


FC0 9 


1230 


13CD 


F709 


CD77 


OCAF 


CD 73 


03E1 


CI 11 


12C0 


3E0A 


CD9 1 


12C5 


F5E5 


D5 6 


2F0 4 


E1E5 


12D0 


0D30 


F8E1 


CD3 6 


ODEB 


El 70 


2 3F1 


C13D 


12E0 


C5E5 


2110 


41CD 


B109 


180C 


C5E5 


CD08 


12F0 


CDFB 


OACD 


B409 


E1C1 


AFl 1 


D213 


3FCD 


1300 


C5F5 


E5D5 


CDBF 


9E1 


062F 


0473 


965F 


1310 


9E5 7 


2379 


9E4F 


2323 


30F0 


CDB7 


0723 


1320 


09EB 


E170 


23F1 


CI 38 


D313 


13 3E 


0418 


1330 


11D8 


13 3E 


05CD 


91 1 2 


C5F5 


E5EB 


4E23 


1340 


2 3E3 


EB2A 


2141 


062F 


047D 


936F 


7C9A 


1350 


F719 


2221 


41D1 


E170 


23F1 


C13D 


20D7 


1360 


12 77 


D1C9 


1^) t ^' A 


fv^/^ 


F9 2 


1 5A2 


FDFF 


1370 


A9 5F 


6 3B2, 


FEFF 


03BF 


G9 1 B 


0EB6 


V'YI- 


1380 


<b44^ 


^rH 


^m 


04BF 


C913 


0EB6 


0080 


1390 


7E8D 


0300 


4 07A 


10F3 


5A0 


OOAO 


724E 


13A0 


0000 


10A5 


D4E8 


0^:^^ 0E8 


7648 


1700 


13B0 


E40B 


5402 


'4' 4 "r-V 


'00C/\ 


9 A 33 


v^;^- 




13C0 


0500 


0000 


8096 


9800 


V \ "^ /■ 


0040 


4 2 OF 


13D0 


'fN^ 


A0 8 6 


0110 


2700 


1027 


E803 


6400 


13E0 


0100 


2182 


09E3 


E9CD 


A 4 9 


2180 


13 CD 


13F0 


1803 


CD31 


0AC1 


D1CD 


5509 


7828 


3CF2 


1400 


B7CA 


9A19 


B7CA 


7907 


D5C5 


7 9F6 


7FCD 


1410 


F221 


14D5 


C5CD 


4 OB 


C1D1 


F5CD 


OCOA 


1420 


1FE1 


2223 


41E1 


2221 


4 IDC 


E213 


CC32 


1430 


C5CD 


0908 


C1D1 


CD4 7 


8 CD 


A409 


0138 


1440 


3BA7i 


CD47 


8 3A 


2441 


FES 8 


D231 


9 CD 


1450 


C680 


C602 


DA 31 


9F5 


21F8 


07CD 


0307 


1460 


08F1 


C1D1 


F5CD 


1307 


CD 8 2 


0921 


7914 


1470 


1411 


0000 


C14A 


C3 4 7 


0308 


4 2E 


9474 


1480 


2E77 


6E02 


8 87A 


E6A0 


2A7C 


5 0;^^ 


AA7E 


1490 


7F7F 


0000 


8081 


0000 


0081 


CDA4 


0911 


14A0 


D5E5 


CDBF 


09CD 


4708 


EICD 


A4 9 


7E2 3 


14B0 


0906 


F1C1 


D1 3D 


CSD5 


C5F5 


E5CD 


4708 


14C0 


C209 


E5CD 


1607 


E118 


E9CD 


7F0A 


7CB7 


14D0 


1EB5 


CAFO 


14E5 


CDFO 


14 CD 


BF09 


EBE3 


14E0 


CFOA 


C1D1 


CD47 


0821 


F8 7 


CDOB 


7C3 


14F0 


2190 


40E5 


1 100 


0043 


2603 


2E08 


EB29 



i 

0AF5 . . . ! 'A. 

CDOC . . .0. .0. .C. . .0. 

OBOF I. .K. . . . 

C9E7 

1174 # 

2 318 . .1. . .C =6 0# 



823C 60#= < 

C04F G<. .0.. .0: .@.@.0 

3 6 2C . . . .6." .@#H. , .6, 

217C # 1 . 

8C13 

CD48 > . / H 

073C . . I .A < 

9112 ?. . . 

2 3 7A / #. 

CD34 .W#..0++0 #.. 

6D5 ....#. .8. ..>... . 

4 6C5 . . .> NfF. 

67 30 ^. ,*!A./ 

cnQ 1 " I A & = 

9F31 1 

f'PC'f 

C6A4 

18 9 .... @ ... Z .,., N . . 

nH' H 

E 1 F5 . . T ; 

(^4^1 3B. . . 

OAOO ' . . ' 

3109 . . ! ! 

0414 U. . (<. . . 

BF09 r 

E17C . ! @ 

k) Zj LJZ) • « TT -tV • ■ iTi ■■ • • « * • « 

8111 .G 3. . 

4003 ; . .G. :$A. . . 1 . .9. 

CD4 1 1 ..!..... .A 

CDA9 ! . . . . 

704F J.G. .@. . . .0 

E F V E A p 

320C 2. 

L-> \ \^ lJ a«a«»'~~'»ao9e«w««» 

400B . . . . .G. 1 . . . o . .§. 

E379 i .@. . . .K&. ...).. 



TRS-80 DISASSEMBLED HANDBOOK 



PAGE 44 



1500 


174F 


E37E 


0777 


E3D2 


1615 


E5 2A 


AA40 


1510 


3AAC 


4089 


4FE1 


2DC2 


FC14 


E323 


E325 


1520 


14E1 


2165 


B019 


2 2AA 


40GD 


EFOA 


3E0 5 


1530 


AC4 


EB06 


8021 


2541 


702B 


704F 


0600 


1540 


0721 


8B15 


CD OB 


07CD 


A409 


0149 


831 1 


1550 


CDB4 


9C1 


DICD 


A2 8 


GDA4 


09GD 


400B 


1560 


GDI 3 


0721 


8F15 


GDIO 


07CD 


5509 


37F2 


1570 


GD08 


07GD 


5509 


B7F5 


F482 


0921 


8F15 


1580 


07F1 


D482 


09,21 


9315 


G39A 


14DB 


0F49 


1590 


0000 


7F05 


BAD7 


1ES6 


6426 


9987 


5834 


15A0 


E05D 


A586 


DAOF 


4983 


CDA4 


09CD 


4715 


15B0 


CDA4 


09EB 


CDB4 


09CD 


41 15 


C3A0 


08CD 


15C0 


FCE2 


13FG 


8209 


3A24 


4 1FE 


8138 


0C01 


15D0 


5159 


CDA2 


0821 


1007 


E5 21 


E315 


CD9A 


15E0 


8B15 


G909 


4AD7 


3B7 8 


026E 


847B 


FECI 


15F0 


7431 


9A7D 


8 4 3D 


5A7D 


C87F 


917E 


E-4BB 


1600 


6CAA 


AA7F 


4^^U (ii^i 


8A0 9 


370B 


7709 


1610 


EF2A 


F5 2 7 


E713 


C914 


0908 


3914 


4 115 


1620 


A815 


BD15 


AA2G 


5241 


5841 


5E41 


6141 


1630 


6741 


6A41 


6D41 


7041 


7F0A 


B10A 


DBOA 


1140 


032A 


36 2 8 


C52A 


0F2A 


1F2A 


6 12A 


912A 


1650 


C54E 


44C6 


4F52 


D2 4 5 


5345 


5 4 D3 


4554 


1660 


53G3 


4D44 


D241 


4E44 


4F4D 


CE45 


5854 


1670 


5441 


C94E 


5055 


54G4 


494D 


D245 


4144 


1680 


54C7 


4F54 


4FD2 


554E 


G946 


D245 


5354 


1690 


45C7 


4F5 3 


5542 


D2 4 5 


54 55 


524E 


D2 4 5 


16A0 


544F 


50C5 


4C53 


4 5D4 


524F 


4ED4 


524F 


16B0 


C4 4 5 


4653 


5452 


C445 


4649 


4E54 


G445 


16C0 


4E47 


G4 4 5 


4644 


424C 


CG49 


4E4 5 


G544 


16 DO 


G5 5 2 


5 24F 


52D2 


4 55 3 


554D 


45CF 


5554 


16E0 


CF50 


4 5 4E 


C649 


4 5 4C 


44C7 


4 554 


D055 


16F0 


4G4F 


5 345 


GC4F 


4144 


CD4 5 


5247 


4 5CE 


1700 


45CB 


494C 


4CCC 


5 345 


54D2 


5 34 5 


54D3 


1710 


45D3 


5953 


54 45 


4DCC 


5052 


4 9 4E 


54C4 


1720 


D04F 


4B45 


D052 


494E 


54C3 


4F4E 


54CC 


1730 


54CC 


4C49 


5 35 4 


C4 4 5 


4C45 


5445 


C155 


1740 


G34C 


4541 


52C3 


4C4F 


4144 


C353 


4 156 


175 


4557 


D441 


4228 


D44F 


G64E 


D5 5 3 


494E 


1760 


4152 


5054 


52D5 


5 35 2 


C5 5 2 


4CC5 


5252 


1770 


5249 


4E47 


24C9 


4E5 3 


5452 


D04F 


494E 


1780 


494D 


4524 


GD45 


4DC9 


4E4B 


45 5 9 


24D4 


1790 


4ECE 


4F54 


D354 


4 5 50 


ABAD 


7VAAF 


D3C1 


17A0 


GF52 


BEBD 


BCD3 


474E 


C94E 


5 4 CI 


4253 


17B0 


4 5G9 


4E50 


D04F 


5 3D3 


515 2 


D24E 


4 4CC 


17C0 


G558 


50G3 


4F53 


D3 4 9 


4ED4 


414E 


CI 54 


17D0 


454 5 


4BC3 


5649 


G3 5 6 


5 3C3 


564 4 


C54F 


17E0 


4F43 


CC4F 


46CD 


4D4 9 


24CD 


4B53 


24CD 


17F0 


24C3 


494E 


54C3 


5 3 4E 


47C3 


4442 


4CC6 



19EB .0.* *.@. . 

C2FA : .@.0.- #.%. . 

8 9 32 ,.!...".§...>. .2 

C365 .@. . . !%A.+.0 

DBOF . 1 I 

C1D1 @. . . 

7715 . . . ! U. 7. . . 

CDOB . . . .U ! . . . . 

8100 1 I. . 

2387 &. .X4#. 

C1E1 I G... 

5509 A U. 

0081 :$A. .8. . . . 

14 21 QY ...!... ! .1 

2F/C ,,». U.J. ••••••/• 

4C7E .1 . . . = Z L. 

D427 7 ' 

4715 .*. • 9.A.G. 

6441 ,RAXA.A.A.A 

260B .A. A. A. A &. 

9A2A .*6(. *.*.*.*.*.* 
C34C .ND.OR.ESET.ET.L 
C441 S.MD.A_NDOM.EXT.A 
CC45 TA.NPUT.IM.EAD.E 
4F5 2 T.OTO.Ul-J.F.ESTOR 
4DD3 E.OSUB.ETURN.EM. 

4 6 46 TOP.LSE.RON.ROFF 
4653 .EFSTR.EFINT.EFS 
4954 NG.EFDBL.INE.DIT 
CF4E .RROR.ESUME.UT.N 

5 4C3 .PEN.IELD.ET.UT. 
41 4D LOSE.OAD.ERGE.AM 
4 156 E.ILL.SET.S^ET.AV 
4546 E.YSTEM. PRINT. EF 
4 9 53 .OKE.RIMT.ONT.IS 
544F T.LIST.ELETE.UTO 

4 5CE .LEAR. LOAD. SAVE. 
47D6 EV7.AB (.O.N. SING. 
D354 ARPTR.SR.RL.RR.T 

5 4D4 RING?.NSTR.OINT. 
4845 IHE$.EH.NKEY$.HE 
4E44 N.OT.TEP. .... .ND 

C6 5 2 .R GN.NT.BS.R 

4F47 E.NP.OS.QR.ND.OG 
4ED0 .XP.OS.IN.AN.TN. 
46CC EEK.VI.VS.VD.OF. 
4B44 OC,OF.p;i$.KS$.KD 
4 9 58 $.INT.SNG.DBL.IX 



TKb-bU LUSAbSEJ'iBLED HAITOBOOK 



PAGE 4 5 



1800 

1810 

1820 

1830 

1840 

1850 

1860 

1870 

1880 

1890 

18A0 

1 8B0 

18C0 

18D0 

18E0 

18F0 

1900 

1910 

1920 

1930 

1940 

1950 

1960 

1970 

1980 

1990 

19A0 

19B0 

19 CO 

19D0 

19E0 

19F0 

lAOO 

1A10 

1A2 

1A30 

1A40 

1A50 

1A6 

1A70 

1A80 

1A9 

lAAO 

lABO 

lACO 

lADO 

lAEO 

lAFO 



CC45 

2 4CG 
A7 8 
B6 22 

3 9 20 
F81D 
AFIF 
8841 
6720 
0820 

4 6DB 
0DE5 
0BC7 
4446 
4454 
454D 
0047 

726F 

4272 

2346 

E1C8 

2B1 a 

6F3E 

407C 

1D2A 

1E24 

40C3 

EB2A 

2AF0 

C336 

3E3F 

19E5 

067C 

F801 

CCS 3 

E240 

20CD 

2AE4 

40F6 

1AD7 

FA 2 3 

4 0CD 

EB22 

27D1 

E374 

1 B 1 A 

5D1B 



4 EDS 
.4546 
AEID 
5 1 F 
91mD 
001E 
F32A 
8B41 
5B41 
7A1E 

0D7 8 
03F2 
4 3 4F 
4D4F 
4F4 6 
3E00 

7200 

6561 

2 3E5 

0913 

F8E5 

FF9C 

A5 3C 

DA4 

2AA2 

9A1B 

EA4 

407C 

IDAF 

CD2A 

2AEA 

A5 3C 

CDF9 

2E2 1 

E5CD 

2A0 3 

4019 

FFC3 

3C3D 

7EFE 

B241 

EC40 

2AF9 

D1 E5 

7723 

CDS 8 



5452 
542 4 
A11C 
9A21 
B1 IE 
03 IE 
6C1F 
8E41 
B12C 
1F2C 

^n(^ 

0A16 

0B90 

5 64F 

53 4C 

444C 

C94A 

4030 

2069 

6B00 

6960 

E5CD 

2AFD 

3S04 

2808 

22A2 

4022 

C17B 

7 CAS 

B5EB 

7759 

0319 

40E3 

C4A7 

2021 

FFFF 

AFOF 

CD61 

38F4 

EB2F 

CA3 3 

2 0CC 

D2 5A 

EBCD 

40E3 

2 32 3 

13B7 

4 1C3 



2 4 06 
D2 4 9 
3801 
0826 
DElE 
061E 
7941 
9141 
6F20 
F5 2B 
0AF4 
0713 
2439 
4D5 5 
b J J J 

3 3D6 
1E40 
004C 
6E20 
2104 
7AB3 
6C19 

4 06 
6 7 39 
3AF2 
401E 
EA4 
4B32 
3C28 
21F2 
CDF9 
7ECD 
CDA7 
0F3E 
2919 
2 2A2 
D1D5 
03D1 
D51 1 
3E3E 
1AF5 
C909 
1DD5 
2C1B 
C109 
7323 
20F9 
331 A 



414C 

4 7 4 3 

35 01 

EF21 

07 IF 

091E 

7C41 

9741 

E41D 

491B 

OABl 

0747 

0A4E 

4C42 

5443 

006F 

E6 4D 

4 3FE 

0052 

0039 

EB28 

C5E3 

0009 

E1D8 

4037 

0201 

2 2EC 

9A40 

0722 

4028 

2021 

2A0 3 

28E1 

CICD 

CDA7 

4 3A 

CD2C 

3006 

F9FF 

CD2A 

CD5A 

D5CD 

C5AF 

C5DC 

E5CD 

722 3 

D1CD 

2AA4 



C153 

5424 

C901 

21 IF 

A9 1D 

A3 4 1 

7F41 

9A41 

2E2B 

7979 

0A77 

8A2 

4 6 53 

5344 

4E4E 

7CDE 

DBOO 

FEE 9 

4541 

7E23 

02EB 

CIDF 

093E 

lEOC 

1E22 

1E14 

4001 

2AE6 

F540 

08A6 

C918 

D7CD 

IIFE 

8B03 

283A 

E140 

1B3E 

AF3 2 

DFDI 

3CD 

1E2B 

COIB 

32DD 

E42B 

5519 

EB2A 

FCIA 

40EB 



43C3 

CD49 

734 1 

C21E 

071F 

6 2E 

8 2 4 1 

A0 4 1 

292B 

7C7C 

0C70 

080C 

4E52 

4 4 2F 

5252 

0067 

C9D3 

4220 

4 4 5 9 

FE81 

DF01 

7E02 

E5 3E 

1824 

2014 

011E 

B419 

4022 

EB22 

2005 

CDA6 

2A0 3 

FFDF 

CD AC 

9A40 

B728 

2A38 

E140 

30EC 

6 103 

7EFE 

DlFl 

40D7 

DlFl 

E122 

A740 

CDB5 

626B 



4852 

4424 

D301 

A3 IE 

F7 1 D 

F41F 

8541 

B202 

C62B 

7F50 

OCAl 

071D2 

474F 

3049 

5 75 5 

7 8DE 

00C9 

4572 

ODOO 

C04E 

OEOO 

C80B 

C6 9 5 

2AA2 

C3C1 

0001 

2AE8 

EE4 

F740 

35EB 

4 157 

211D 

CA7 4 

4 1 CD 

D602 

372A 

023E 

18B9 

22E2 

DA 3 3 

2028 

22E6 

B7F5 

D528 

F940 

EB1B 

4 ICD 

7E23 



.EN.TR$.AL,SC.HR ^ 
?.EFT?.IGHT$.ID$ 
. .8.5. 



,A. 



!.&.]! 



. . .*. . .A. A. A. A. A 
.A. A. A. A. A. A. A. . 
. . «A, /•• • • •"!■/+« + 

F 

G 

?9.NFSNRG0 

DFCOVOMULBGDD/OI 
DT MOS LS S T CNI ] RRls'U 

EM0FDL3 

.G>. .J.(a.M 

@O.LC. . .B.E. 

READY . . 

B ' 9 ;} M 

+ ...*.(§....>.>.. 
.>. .8. .9 $*. 

@ ..<(.:. @ .. " 

* i3 " ra 

. $ * . @ " . (a " . @ . . . * . 

@ K2.@*.@".@ 

.*.(§..<(.". @ .". (a 
*.@. . . !.@ ( 5. 



.6 . . .Y 

• • • ^ • • 



I AW 

* * I 

* a • B tt • • 

^ • ■ • • « • JTi, a 

!).. . (:.0.. 

.S. ! , .".@:.@. (7* 

.(§ ,.>*8.> 

* 9 

* (3 8 n " 

{3 />> * T 



@..A.Z...,2.@.., 
" (3 + ! 

' .*.@ U. .".@ 

A "^ * a * 



TRS-80 DISASSEMBLED HAl^DBOOK 



PAGE 4 6 



IBOO 


B6C8 


2 32 3 


2 3AF 


BE2 3 


20FC 


EB73 


2372 


18EC 


1B10 


( / />' 


fi: DC 


'2809 


D1CD 


4F1E 


D528 


OBCF 


CE11 


1B20 


FAFF 


C44F 


1EC2 


9719 


EBD1 


E3E5 


2AA4 


4044 


1B30 


4D7L 


2 3B6 


2BC8 


2 32 3 


7E23 


6 66F 


DF6 


697E 


1B40 


2366 


6F3F 


C8 3F 


DO 18 


E6C0 


CDC9 


012A 


A4 4 


1B50 


CDFB 


1D32 


E140 


7723 


7723 


2 2F9 


4 2A 


A4 4 


1B60 


2B22 


DF40 


061A 


2101 


4 136 


0423 


10FB 


AF32 


1B70 


F2 4 


6F67 


2 2F0 


4022 


F7 4 


2AB1 


4022 


D640 


1B80 


CD9 1 


1D2A 


F9 4 


2 2FB 


4022 


FD4 


CDBB 


4 1 CI 


1B90 


2A/^.0 


4023 


2B22 


E340 


2323 


F921 


3540 


2233 


IBAO 


40CD 


8B03 


CD69 


21AF 


676F 


3 2 DC 


4 0E5 


C5 2A 


IBBO 


DF4 


C9 3E 


3FCD 


2A0 3 


3E20 


CD2A 


3C3 


6103 


1BC0 


AF3 2 


B040 


4 FEB 


2AA7 


402B 


2nEB 


7EFE 


20CA 


1BD0 


5B1C 


4 7FE 


2 2CA 


771C 


B 7 CA 


7D1C 


3AB0 


4037 


IBEO 


7EC2 


5B1C 


FE3F 


3EB2 


CA53 


1C7E 


FE30 


38s5 


IBFO 


FE3C 


DA5B 


1CD5 


1 14F 


16C5 


01 3D 


1CC5 


067F 


1C0 


7EFE 


6138 


07FE 


7B30 


03E6 


5F77 


4EEB 


2336 


1C10 


F20E 


1C04 


7EE6 


7FC8 


B920 


F3E3 


E51 3 


1AB7 


1C20 


FA39 


1C4F 


7 8FE 


8D20 


02D7 


2B23 


7EFE 


6138 


1C30 


02E6 


5FB9 


28E7 


El 18 


D348 


FIEB 


C9EB 


79C1 


1C40 


D1EB 


FE9 5 


36 3 A 


2002 


0C23 


FEFB 


200C 


36 3A 


1C50 


2306 


9370 


2 3EB 


OCOC 


181D 


EB23 


1213 


0CD6 


1C6 


3A2 8 


4FE 


4E20 


3 32 


B040 


D659 


C2CC 


1B47 


1C70 


7EB7 


2809 


B828 


E423 


120C 


1318 


F321 


0500 


1C80 


4409 


444D 


2AA7 


4 2B 


2B2B 


1213 


1213 


12C9 


1C90 


7C92 


C07D 


9 3C9 


7EE3 


BE2 3 


E3CA 


781D 


C397 


1CA0 


193E 


6432 


DC4 


CD21 


1FE3 


CD 3 6 


19D1 


2005 


ICBO 


09F9 


22E8 


40EB 


OEOB 


CD6 3 


19E5 


CD05 


1FE3 


ICCO 


E52A 


A2 4 


E3CF 


BDE7 


CAF6 


0AD2 


F60A 


F5CD 


ICDO 


3723 


F1E5 


F2EC 


1CCD 


7F0A 


E311 


/./cT^ 


ne ft? 


ICEO 


CCCC 


012B 


D5E5 


EBCD 


9E09 


1322 


CDBI 


OACD 


1CF0 


BF09 


E1C5 


D5 01 


0081 


515A 


7EFE 


CC3E 


0120 


IDOO 


OECD 


3823 


E5CD 


B10A 


CD3F 


09CD 


5509 


E1C5 


1D10 


D54F 


E747 


C5E5 


2ADF 


4 0E3 


0681 


C53v 


CD58 


1D20 


03B7 


C4A0 


1D22 


E640 


ED73 


E840 


7EFE 


3A28 


1D30 


29B7 


C297 


19 2 3 


7E23 


B6CA 


7E19 


235E 


2356 


1D40 


EB22 


A2 4 


3A1B 


41B7 


280F 


D5 3E 


3CCD 


2A0 3 


1D50 


CDAF 


0F3E 


3ECD 


2A03 


DIEB 


D711 


1E1D 


D5C8 


1D6 


D680 


DA21 


1FFE 


3CD2 


E72A 


074F 


0600 


EB21 


1D7 


221 8 


094E 


2 34 6 


C5EB 


237E 


FE3A 


DOFE 


2 OCA 


1D80 


781D 


FEOB 


3005 


FE09 


D278 


1DFE 


303F 


3C3D 


1D90 


C9EB 


2A7\4 


402B 


2 2FF 


4 0EB 


C9CD 


580 3 


B7C8 


IDAO 


FE6 


CCS 4 


0332 


9940 


3DC0 


3CC3 


B41D 


C0F5 


IDBO 


CCBB 


41F1 


22E6 


4021 


B540 


22B3 


4021 


F6FF 


1DC0 


C12A 


A2 4 


E5F5 


7DA4 


3C28 


0922 


F540 


2AE6 


IDDO 


4022 


F740 


CD3B 


3 CD 


F9 2 


F121 


3019 


C206 


IDEO 


1AC3 


181A 


2AF7 


407C 


B51E 


2 OCA 


A219 


E32A 


IDFO 


F540 


22A2 


40EB 


C9 3E 


AF3 2 


1341 


C9F1 


E1C9 



(...0.. ( 

.. .0. ...... .*.@D 

M.ff. + .jrff.f. « . • • » 
#..?.? *.@ 

... 2 . (a .#.#". @ * . @ 
+ ".(§. . I .A6.#. . .2 
. @ . . " . @ " . @ * . (a " . @ 
...*. @ ". @ ".(§.. A . 
*.(a4-+".@##. I .@". 
(9 I 2 (3 * 

.@. >?.*.>. . * 

.2.tao.*.@++ 

r " • (3 

..O* .........V-» 

?> 08. 

. < 0. .. = ... . 

. . .8. . .0 N.#. 

( H 

: ( . . M . . 2 . @ . Y . . . G 

..(..(.# !.. 

D.DM*.ia+++ 

# 

.>.2.@.!...6.... 
" fl 

. '^.e 

fl a a • » 9 \2 U 9 9 n y* *> » 

..".§... @ ..: ( 

j ....Tr.Tr....tr.irv 

.".@:.A. (. .X.*. 
.!..<.. *.0. . . ! 

* £34-" (3 y 

» a •^•C ft^« • • • • 

A.".(3!.@''.9!, . 

. * . <(.".§*. 

a" .(? 10. . , 

* (3 * 



TRS-80 DISASSEMBLED HANDBOOK p;^GE 47 



1E00 


1E03 


01 IE 


0201 


1E04 


011E 


08CD 


3D1E 


1E10 


19C5 


D8D6 


4 14F 


4 7D7 


FECE 


2009 


D7CD 


1E20 


D8D6 


4147 


D778 


91D8 


3CE3 


2101 


4106 


1E30 


7 32 3 


3D20 


FBE1 


7EFE 


2CC0 


D718 


CE7E 


lE-IO 


D8FE 


5B3F 


C9D7 


CD02 


2BF0 


1E08 


C3A2 


1E50 


FE2E 


EB2A 


EC40 


EBCA 


7S1D 


2B1 1 


0000 


1E60 


E5F5 


2193 


19DF 


DA9 7 


1962 


6B19 


2919 


1E70 


D6 3 


5F16 


0019 


EBE1 


18E4 


CA61 


IBCD 


1E80 


2BD7 


C0E5 


2.AB1 


407D 


9 3 5F 


7C9A 


57DA 


1E90 


27VF9 


4001 




C'-i '0\ 


'D27A 


19EB 


22A0 


lEAO 


C361 


1BCA 


5D1B 


CDC7 


4 ICD 


61 IB 


011E 


lEBO 


10 0E 


03CD 


6319 


C1E5 


E5 2A 


A2 4 


E33E 


lECO 


3 3C5 


CD5A 


lECD 


071F 


E52A 


A2 4 


DFE1 


lEDO 


2F1B 


D4 2C 


1360 


692B 


DS1E 


0EC3 


A219 


lEEO 


FFCD 


3619 


F922 


E840 


FS9 1 


1E04 


C2A2 


lEFO 


22A2 


4 23 


7CB5 


2007 


3ADD 


40B7 


C218 


IFOO 


1E1D 


E33E 


E101 


SiV/i- 


?</a(£, <fr/^( 


4847 


1F10 


C8B8 


C8 2 3 


FE22 


28F3 


D6 3F 


20F2 


B8 8A 


1F2 


EDCD 


0D26 


CFD5 


EB22 


DF40 


EBD5 


E7F5 


1F3 


23F1 


E3C6 


03CD 


1923 


CD0 3 


0AE5 


2028 


1F4 


41E5 


235E 


2 35 6 


2A-^4 


40DF 


30 OE 


2AA0 


1F50 


D130 


0F2A 


F9 40 


DF30 


093E 


D1CD 


F5 29 


1F60 


4 32 8 


CDFS 


2 9S3 


CDD3 


09D1 


E1C9 


FE9E 


1F70 


D7CF 


8DCD 


5A1E 


7AB3 


2809 


CD2A 


1B50 


1F80 


D2D9 


lEEB 


2 2F0 


40EB 


D8 3A 


F240 


B7C8 


1F9 


4 5F 


C3AB 


19CD 


1C2B 


7E47 


FE91 


2803 


IFAO 


2B4B 


0D78 


CA6 


1DCD 


5B1E 


FE2C 


CO 18 


IFBO 


F240 


1.\B7 


CAAO 


193C 


3 2 9A 


4012 


7EFE 


IFCO 


OCCD 


5A1E 


C07A 


B3C2 


C51E 


3C18 


02D7 


IFDO 


EE40 


EB2A 


EA4 


22A2 


4 0EB 


C0 7E 


B720 


IFEO 


2323 


2323 


7AA3 


3CC2 


051F 


3ADD 


403D 


IFFO 


1DC3 


051F 


CDIC 


2BC0 


B7CA 


4A1E 


3D87 


2000 


2D38 


021E 


26C3 


A219 


1 10A 


v'vO:,'' 


2817 


2010 


lEEB 


E328 


1 1EB 


CF2C 


EB2A 


E440 


EB28 


2020 


5A1E 


C297 


19EB 


7CB5 


CA4A 


1E22 


E440 


2030 


40E1 


22E2 


40C1 


C3 3 3 


lACD 


3723 


7EFE 


2040 


781D 


EEC A 


CC7 8 


1D2B 


E5CD 


9409 


E128 


2050 


DAC2 


1EC3 


5F1D 


1601 


CD05 


1FB7 


C8D7 


2060 


20F6 


1520 


F318 


E8 3E 


0132 


9C40 


C39B 


2070 


CA4 1 


FE4 


2019 


CD01 


2BFE 


04D2 


4A1E 


2080 


003C 


1922 


2040 


7BE5 


3F32 


A640 


EICF 


2090 


2 32 


8 CD 


8402 


3E8 


329C 


402B 


D7CC 


20A0 


CA6 9 


21FE 


BFCA 


BD2C 


FEBC 


CA3 7 


21E5 


20B0 


CA0 8 


21FE 


3BCA 


6421 


C1CD 


372 3 


E5E7 


20C0 


CD3D 


OFCD 


6528 


CDCD 


4 12A 


2141 


3A9C 


20D0 


FAE9 


2028 


08 3A 


9B40 


8 6FE 


8418 


093A 


20E0 


473A 


A5 4 


86B8 


D4FE 


20CD 


AA2 8 


3E20 


20F0 


03B7 


CCAA 


28E1 


C39B 


203A 


A6 4 


B7C8 



0197 - 

3D1E AOG = . 

0009 . .AG <. !.A. .. 

FE41 .#= , A 

D7D0 ...*.§....+ 

29F1 . . 1 ) .) . 

461E .0 F. 

7A19 +...*. (3 w. . . 

4 0E1 *.(§.( ".§. 

1D18 A 

9 1 F 5 * (3 ■> 

23 DC 3..Z *.?..#. 

C016 /..,... + 

lyji/i ..b.. .y. ,,.,,,, 

1A21 ".(?# : .@ I 

7EB7 ...>..: EG. . 

■3/18 ...IT. ( W. 

CD37 ...&...".§ 7 

2A21 # ( (*i 

40DF A.#.#V*.@.0.*.(a. 
EBCD .0.*.@.0.>. . .) .. 
^^■^-^ '-\«»/ •••••«•«..% 

59E1 Z...(..*.PY. 

3A9A . . . . ".@. . : .@. . : . 
CF8D (3 + .G. . (, . . 

8728 .@ <2.@. ... ( 

C02A . ,Z < * 

0423 .{a.*.(a".@. ,....# 
CABE ####. .<. . . :.@=. . 
^ r £ lit •••••»"'"»», vj»~^»c« 

CD4F -8. .& (. .0 

06CD ...(...,.*. la. (,. 
jzIEl Z. ..,,., .J. .(§2. 
2CCC §.".(3. .3.,7#.. ,. 

07D7 + (.. 

FE95 

20CD >.2.(a. . . . 

E521 .A.(3. . . . + . . .J. . ! 
2CFE .<.".@. .72.(3. . ,. 
FE20 # >.2.@+ 

2 8 32 . . 1 . ;, . ] . .7#. . (2 

4 0B7 .' (. .A*1A:,@. 

9D40 ...(. :,@. .,.,:. (3 

CD2A G:.@... (>. .* 

3E0D ..,.(....:.§..>. 



TRS-80 DIS/iSSE?-IBLED HAiNDBOOK PAGE 4 8 



< 



2100 CD2A 03CD D041 AFC9 CDD3 4 1 3A 9C40 B7F2 .*...A A:.@.. 

2110 1921 3E2C CD2A 0318 4B28 083A 9B40 FE70 .!>,,*. .K (.:.(§. . 

2120 C32B 213A 9E40 473A A6 4 B8D4 FE20 3034 . + !:.@G:.@ 04 

2130 D610 30FC 2F18 23CD 1B2B E63F 5FCF 292B .. . /A .. + .?..) + 

2140 E5CD D341 3A9C 4037 FA4A 1ECA 5321 3A9B . . . A : . @ . . J . . S 1 : . 

2150 4018 033A A640 2F83 300A 3C47 3E20 CD2A § . . : . @/. . <G> . . * 

2160 0305 20FA ElD7 C3A0 203A 9C40 B7FC F801 :.Q 

2170 AF32 9C40 CDBE 41C9 3F52 4544 4F0D 003A . 2 . (§ . . A. ?REDO. . : 

2180 DE40 B7C2 9119 3AA9 40B7 1E2A CAA2 19C1 .@ :.@..* 

2190 2178 21CD A728 2/vE6 40C9 CD28 287E CDD6 !.!..(*.§..((... 

21A0 41D^ 2332 A9 4 7E20 20CD 9302 E506 FA2A A. ^2. 9 * 

21B0 A740 CD35 0277 23FE 0D28 0210 F52B 3600 . @ . 5 ..#..(... +6 . 

21C0 CDF8 012A A740 2B18 2201 DB21 C5FE 22C0 ,..*.(§+,".. I .." . 

21D0 CD66 28CF 3BE5 CDAA 28E1 C9E5 CDB3 iBCl ..(.;...( 

21E0 DABE 1D23 7EB7 2BC5 CAO 4 1F36 2C1 8 05E5 ...#..+ 6,... 

21F0 2AFF 40F6 AF32 DE40 E318 02CF 2CCD 0D26 * . § . . 2 . (3 ,..& 

2200 E3D5 7EFE 2C28 263A DE40 B7C2 9622 3AA9 ,(&:.@...":. 

2210 40B7 1E06 CAA2 1 9 3E 3FCD 2A03 CDB3 iBDl @ >?.* 

2220 CIDA BE1D 237E B72B C5CA 041F D5CD DC41 #.. + A 

2230 E7F5 2019 D757 47FE 2228 0516 3A06 2C2B WG. "(..:.,+ 

2240 CD69 28F1 EB21 5A22 E3D5 C333 1 FD7 Fl F5 ..(..!Z"..,3 

2250 0143 22C5 DA6C 0ED2 650E 2BD7 2805 FE2C . C" +.(.., 

226 C27F 21E3 2BD7 C2FB 2lDl V>'>'V ^'/'/'t/ ^^^'^ -•'• + ••• • = 

2270 DE40 B7EB C296 1 DD5 CDDF 41B6 2186 22C4 .@. A.!.". 

2280 A728 E1C3 6921 3F45 7874 7261 2069 676E .(...! ?E 

2290 6F72 6564 ODOO CD05 1FB7 2012 237E 23B6 #.#. 

22A0 1E06 CAA.2 1923 5E23 56EB 22DA 40EB D7 FE #.§V.".@... 

22B0 8820 E3C3 2D22 I I y(^ (^pcij-0D26 22DF 40CD -" &".@. 

22C0 3619 C29D 19F9 22E8 4005 7E23 F5D5 7E23 6 ".@. .#...# 

22D0 B7FA EA22 CDBl 09E3 E5CD OB07 EICD CB09 ..." 

22E0 EICD C209 E5CD OCOA 1829 2323 2323 4E23 )##S#N# 

22F0 4623 E35E 2356 E569 60CD D20B 3AAF 40FE F#..^V j_ . : . @ . 

2300 04CA B207 EBEl 722B 73E1 D55E 2356 23E3 +....#V#. 

2310 CD39 0AE1 C190 CDC2 0928 09EB 22A2 4069 .9 .(..".@, 

2320 60C3 1A1D F922 E840 2ADF 407E FS2C C21E ".@*.@.,,.. 

2330 1DD7 CDB9 22CF 282B 1600 D50E OICD 6319 ".( + 

2340 CD9F 2422 F340 2AF3 4 0C1 7E16 00D6 D438 ..?".@*.@ 8 

2350 13FE 0330 OFFE 0117 AABA 57DA 9719 22D8 ...0 W...". 

2360 40D7 1SE9 7AB7 C2EC 237E 22D8 40D6 CDD8 ca .......#.". 9 .. . 

2370 FE07 D05F 3AAF 40D6 03B3 CA8F 2921 9A1 8 ....:.@ )!.. 

2380 1978 56BA D0C5 0146 23C5 7AFE 7FCA D423 ..V F# # 

2390 FE51 D.AEI 2321 2141 B73AAF40 3D3D 3DCA . Q. . # ! ! A. : . @=== . 

23A0 F60A 4E23 46C5 FAC5 2323 4E23 46C5 F5B7 . .N^F . , . # #N,1F . . • 

23B0 E2C4 23F1 2338 0321 1 D4 1 4E23 4623 C54E , . # . S 8 . I . AN#F# . N 

23C0 2346 C506 F1C6 034B 47C5 0106 24C5 2AD8 #F .KG...?.*. 

23D0 40C3 3A23 CDBl 0ACDA409 1 F2 1316 7F18 {§ . : # 

23E0 ECD5 CD7F' OADi E501 E925 18E1 78FE 64D0 .,..% 

23F0 C5D5 1104 6421 B825 E5E7 C295 232A 2141 ..... 1 .%.,.,#* i A 



TRS-80 DISA-SSE.f-QLED HA],'DBOOK PAGE 4 9 



2400 


E5 01 


8C25 


18C7 


CI 79 


32B0 


4078 


FE0 8 


2410 


3AAF 


4 0FE 


8CA 


6024 


5 7 7 8 


FE0 4 


CA7 2 


2420 


FE 3 


CAF6 


0AD2 


7C24 


21BF 


1 806 


0009 


2 4 30 


2 3 46 


D12A 


2141 


C5C9 


CDDB 


OACO 


FC0 9 


2440 


1F4 1 


E122 


1D4 1 


C1D1 


CDB4 


09CD 


OBOA 


2450 


183A 


B040 


07C5 


4F0 6 


FE0 4 


C17E 


2366 


2460 


C5CD 


FC0 9 


F132 


AF40 


2 8 DA 


E122 


2470 


1 8D9 


CDB1 


0AC1 


D121 


B518 


18D5 


EICO 


2480 


CDCF 


OACD 


BF09 


E122 


2 34 1 


E122 


2141 


2490 


E5EB 


CDCF 


0AE1 


CDA4 


9CO 


CFOA 


C3A0 


24A0 


1E28 


CAA2 


19 DA 


6C0E 


CD3D 


1ED2 


4 25 


24B0 


28ED 


FE2E 


CA6C 


OEFE 


CECA 


32 25 


FE2 2 


24C0 


28FE 


CBCA 


C425 


FE26 


CA9 4 


4 1FE 


C320 


24D0 


3A9A 


40E5 


CDF8 


27E1 


C9FE 


C220 


0AD7 


24E0 


EA4 


CD66 


0CE1 


C9FE 


C020 


14 07 


CF2 8 


24F0 


2 6CF 


29E5 


EB7C 


B5CA 


4A1E 


CD9A 


0AE1 


2500 


CICA 


FE2 7 


FEC5 


CA9D 


4 1FE 


C8CA 


C927 


2510 


CA7 6 


4 1FE 


C6CA 


3201 


FEC9 


CA9 


01FE 


2520 


2F2A 


FE3E 


CA5 5 


4 1D6 


0702 


4E25 


CD3 5 


2 5 30 


29C9 


167D 


CD3A 


2 3 2A 


F340 


E5CD 


7B09 


2540 


CDOD 


2 6E5 


EB22 


2141 


E7C4 


F7 9 


E1C9 


2550 


074F 


C5D7 


7 9FE 


4 138 


recD 


3523 


CF2C 


2560 


OAEB 


2A21 


41E3 


E5EB 


CDIC 


2BEB 


E31 8 


2570 


2C2 5 


E37D 


FEOC 


3 8 07 


FE1B 


E5DC 


B10A 


2580 


3E2 5 


D5 01 


0816 


094E 


2366 


69E9 


CDD7 


2590 


234E 


23 4 6 


D1C5 


F5CD 


DE2 9 


D15E 


234E 


25A0 


E17B 


B2C8 


7AD6 


01D8 


AF3B 


3CD0 


1510 


2 5B0 


2303 


28ED 


3FC3 


6009 


3C8F 


CIAO 


C6FF 


25C0 


8D09 


1812 


165A 


CD3A 


23CD 


7F0A 


7D2F 


2 5 DO 


2F67 


2221 


41C1 


C3 4 6 


233A 


AF40 


FE0 8 


25E0 


D6 3 


B7 3 7 


C9D6 


03B7 


C9C5 


C07F 


OAFl 


25F0 


FA2 7 


C5FE 


4620 


6 7B 


B56F 


7CB2 


C97B 


2600 


7CA2 


C92B 


D7C8 


CF2C 


0103 


2 6C5 


F6AF 


2610 


4046 


CD 3D 


lEDA 


9719 


AF4F 


D738 


5CD 


2620 


3809 


4FD7 


38FD 


CD3D 


1E30 


F811 


5226 


2 6 30 


2FE 


25C8 


14FE 


24C8 


14FE 


21C8 


1608 


2640 


C878 


D6 41 


E67F 


5F16 


00E5 


2101 


4119 


2 6 50 


2BC9 


7A32 


AF4 


D7 3A 


DC4 


B7C2 


6426 


2660 


28CA 


E926 


AF32 


DC40 


E5 05 


2AF9 


4 0EB 


2670 


4 ODF 


E128 


191A 


6FBC 


1320 


0B1A 


B920 


2680 


1A-B8 


CACC 


263E 


I3i3 


cS^^ 


' ?V/'i 


l^Pr 


2690 


E3F5 


D51 1 


F124 


DF28 


361 1 


4 3 2 5 


DFDI 


26A0 


F1E3 


E5C5 


4F06 


0C5 


0303 


032A 


FD40 


26B0 


C1E5 


CD5 5 


19E1 


2 2FD 


4060 


6922 


FB4 


26C0 


OODF 


2 FA 


017 3 


2301 


7323 


72EB 


13E1 


26D0 


5FF1 


F1E3 


C932 


24 4 1 


CI 6 7 


6F22 


2141 


26E0 


0621 


2819 


2221 


41E1 


C9E5 


2AAE 


40E3 


26F0 


C5CD 


4 5 IE 


C1F1 


EBE3 


E5EB 


3C5 7 


7EFE 



2828'..1%....2.@...(( 

247A : .@. . . .$W. $. 

094E $! N 

2 1 AB . A . " . A ! . 

6FE9 . : .@. .0 # . . . 

2141 2.@. . (. . " !A 

A4 9 ! 

18E7 "#A." !A. . 

08D7 

FECD . ( = . .(3%. . 

0AD7 (....%.&. .A 

E52A : .@. . . ' * 

CDOD .@ ( . . 

C9FE &. ) J 

FEC7 ...'... .A, ...'. . 

C4CA . .A. . .2 

23CF /*. . .UA. . .N%.5# . 

0600 ..&.." !A 

C0F4 .0. . . .A8. .5#. , . . 

14CD . .* !A + 

El 1 1 ,% 8 

297E >% N# ) . 

2 3 4 6 ^ N # F ) . . # N S F 

OABE < 

9FCD #. (.?...< 

6F7C Z. :# /. . 

30 05 /." !A. .F# : .@. ,0. 

D101 . . .7 

A5 6F . ' . .F 

32AE ... + ...,. .&^ . .2, 

301E @F. = O. 8. . = . 

D516 8.0.8. .=. 0. .R&. . 

FE2 3 % $ ' & 

56E1 . . , A ! .A.V. 

7ED6 +. .2.(3. : .@. , . &. . 

2AFB (..&. 2. @. .*,§.*. 

0713 @. . ( 

jC-i^ I .... OCX.. .&.,,... 

2 8 35 ?.(6.C%..(5 

E 5 9 O * P 

2B36 . . .U. .".@. .".@+6 

C9 57 #. .# W 

E720 2$A. . . " !A. . 

57D5 .1 (." lA. . .*,@.W. 

2C28 . .E <:\V. , , ( 



TRS-80 DISASSEMBLED HTViNDBOOK 



PAGE 50 



2700 


. EECF 


2922 


F340 


E122 


AE40 


D52A 


FB4 


2710 


EB2A 


FD40 


EBDF 


3AAF 


4028 


27BE 


2320 


2720 


B923 


2004 


7EB8 


3E2 3 


235E 


2356 


2320 


2730 


AE40 


B71E 


12C2 


A219 


F196 


CA9 5 


271E 


2740 


A219 


7 72 3 


5F16 


00F1 


7123 


7023 


4FCD 


2750 


2323 


22D8 


4071 


23 3 A 


AE40 


1779 


010B 


2760 


02C1 


0371 


2370 


23F5 


CDAA 


OBFI 


3D20 


2770 


424B 


EB19 


3 8C7 


CD6C 


1922 


FD4 


2B36 


2780 


20FA 


03'7 


2AD8 


4 5E 


EB29 


09EB 


2B2B 


2790 


7223 


F138 


3047 


4F7E 


2316 


E15S 


2356 


27A0 


F5DF 


D23D 


27CD 


AAOB 


19F1 


3D44 


4D20 


27B0 


7VF40 


444D 


29D6 


0438 


0429 


2806 


29B7 


27C0 


2709 


C109 


EB2A 


F3 4 


C9AF 


E532 


AF4 


27D0 


27E1 


D7C9 


2AFD 


4 0EB 


ri 9V 


ir^y-i 


/77:u. 


27E0 


DA2 9 


CDE6 


282A 


A040 


EB2A 


D6 4 


7D93 


2 7F0 


9A6 7 


C3d6 


0C3A 


A6 4 


6FAF 


67C3 


9A0A 


2800 


41D7 


CD2C 


2 5E5 


2190 


08E5 


3AAF 


4 0F5 


2810 


CCDA 


29F1 


EB2A 


SE40 


E9E5 


E607 


21A1 


2820 


0600 


09CD 


8625 


E1C9 


E52A 


A2 4 


237C 


2830 


COIE 


16C3 


A219 


CDBD 


OFCD 


6528 


CDDA 


2840 


2B2A 


C57E 


23E5 


CDBF 


28E1 


4E23 


46CD 


2850 


E5 6F 


CDCE 


29D1 


C9CD 


BF28 


21D3 


40E5 


2860 


7323 


72E1 


C923 


0622 


50E5 


OEFF 


237E 


2870 


2806 


BA28 


03B8 


20F4 


FE22 


CC78 


1DE3 


2880 


79CD 


5A28 


11D3 


403E 


D52A 


B340 


2221 


2 89 


0332 


AF4 


CDD3 


0911 


D640 


DF22 


B340 


28A0 


COIE 


1EC3 


A219 


2 3 CD 


6528 


CDDA 


29CD 


28B0 


1415 


C80A 


CD2A 


3FE 


ODCC 


0321 


0318 


28C0 


0EF1 


F5 2A 


A0 4 


EB2A 


D640 


2F4F 


6FF 


28D0 


DF3 8 


0722 


D640 


2 3EB 


F1C9 


F1 IE 


1ACA 


28E0 


BFF5 


Old 


28C5 


2.\B1 


4022 


D640 


Uv-'U' 


28F0 


2AA0 


40E5 


21B5 


40EB 


2m3 


4 0EB 


DF01 


2900 


C24A 


292A 


F9 4 


EB2A 


FB4 


EBDF 


2813 


2910 


2 32 3 


FE0 3 


2004 


CD4B 


2 9AF 


5F16 


0019 


2920 


CIEB 


2AFD 


40EB 


DFCA 


6B29 


7E23 


CDC2 


2930 


09FE 


0320 


EB2 2 


D840 


E14E 


6 00 


0909 


2940 


2AD8 


4 0EB 


DF28 


DA01 


3F29 


C5AF 


B6 23 


2950 


5623 


C844 


4D2A 


D6 4 


DF6 


69D8 


E1E3 


2960 


E560 


69D0 


C1F1 


F1E5 


D5C5 


C9D1 


E17D 


2970 


2B46 


234E 


E52B 


6E26 


0009 


5 05 9 


2B44 


2980 


D640 


CD58 


19E1 


7123 


7069 


6023 


C3E9 


2990 


E52A 


2141 


E3CD 


9F24 


E3CD 


F40A 


7EE5 


29A0 


41E5 


861E 


1CDA 


A219 


CD57 


28D1 


CDDE 


29B0 


CDDD 


29E5 


2AD4 


40EB 


CDC 6 


29CD 


C6 2 9 


29C0 


23E3 


E5C3 


8428 


E1E3 


7E23 


4E23 


466F 


29D0 


C80A 


1203 


1318 


F8CD 


F4 0A 


2A21 


4 1EB 


29E0 


29EB 


CODS 


5059 


1B4E 


2AD6 


4 0DF 


2005 


29F0 


22D6 


40E1 


C92A 


B3 4 


2B46 


2B4E 


2BDF 



3E19 ..)/.§. ".§.*.§>. 1 

8 7E .*,@. . :.P ('.#.. . 

E0 3A .#. . . .>##.#V#. . : 

10C3 .@ ' . . . 

6319 . , A #.#0, . . 

0030 #S".@.#: .@ 

EDF5 #. # = . . . 

OODF BK. .8 ".(3+6 . . 

7323 . . .W*.@. .) . .++.# 

23E3 .5.80GO,#. . .#V#. 

EB3A . . . = ' =DM. . : 

E2C2 .§DM) .. 8. )(.).. . 

CDD4 '....*. @. .. 2. g.. 

^OcS) '...*. @ .!., 9 

6F7C .) .. (*.@.*.@ 

CDA9 : .@ 

184F ..)..*.§ 1 . .0 

2901 (. .) . 

5A28 +*..#. . . (,N?fF.Z ( 

413E . .Z (. .@>. *.@" !A> 

F?R7 * 1 

0923 ...*.@.*.(a/0.. .# 

(OpSjT (.*.@".@!,.. 

F728 *.@. 1 .@.*.@ ( 

7E23 .J) *.@.*.@. , (. .# 

lOXliD TT tt a » • 9 9 I\ J «&««•«« 

2 3EB .aoao •@aNo«aaira 

5E23 *.0, .(..?).. .#.# 
DFE3 V#.DM*.@ 

4D2A +F+N.+.&. .PY+DM* 

2A21 .*!A. ..?,,... .*! 

■C, ^ S-i Jj s\ •0o*ao««Vl\«o9y a 
^ t H J »ftya «t2«««/ •«/"-*■ 

ZQZU S» • a (•• oFNtrF* ^"■ 
POPS ^ f A 

4709 ) . . ,PY.N*.@. . .Go 
CO 22 ".§. .*.@+F+N+. ." 



TRS-80 DISASSEMBLED HS-NDBOOK PAGE 51 



2A00 B340 C901 F827 C5CD D729 AF57 7EB7 C901 .@...'...).W 

2A10 F827 C5CD 072A CA4A 1E23 5E23 561A C93E .'...*. J . S . fV. . > 

2A20 01CD 5728 CDlF 2B2A D440 73C1 C384 28D7 ..W(..+*.@ (. 

2A30 CF28 CDiC 2BD5 CF2C CD37 23CF 29E3 E5E7 .(.. + ..,. 7# .).. . 

2A40 2805 CDlF 2B18 03CD 132A DiFS F57B CD57 (... + * W 

2A50 285F FlTC 1D28 D42A D440 7723 1D20 FB18 ( (.*.§.! 

2A60 CACD DF2A AFE3 4F3E E5E5 7EB8 3802 7811 ...*.. 0> 8... 

2A70 OEOO C5CD BF28 ClEl E523 4623 6668 0600 (...iF*.... 

2A80 0944 4DCD 5A28 6FCD CE29 DiCD DE29 C384 . DM . Z {...)...). . 

2A90 28CD DF2A DlD5 1 A9 1 8CB EB7E CDE2 2A04 (..* *. 

2A.A0 05CA 4A1E C51E FFFE 2928 05CF 2CCD 1C2B ..J )(..,..+ 



2A30 CF29 F1E3 0169 2AC5 3DBE (f (/'/: O^i-fv li^il •) *• = 0, 

2AC0 BB47 0843 C9CD 072A CAF8 275F 237E 2366 . G. C ...*..'.#. i 



2AD0 6FE5 1946 72E3 C57E CD65 OECl E170 C9EB ...F 

2AE0 CF29 CiDl C543 C9FE 7AC2 9719 C3D9 4 1 CD .)...C A. 

2AF0 1F2B 3294 40CD 9340 C3F8 27CD 0E2B C396 . +2 . @ .. @ ..'..+. . 

2B00 40D7 CD37 23E5 CD7F O.AEB E17A B7C9 CDiC @..7ff 

2B10 2B32 9440 3297 4 OCF 2C1 8 1 D7 CD37 23CD +2.@2,@., 7# . 

2B20 052B C24a 1E2B D77B C93E 0132 9C40 Cl CD . + . J . + . . . > , 2 . @ . . 

2B30 101B C521 FFFF 22a2 40E1 D14E 2346 2378 ...!..". @ .. N # F§ . 

2B40 B1CA 191A CDDF 4 1 CD 9BlD C54E 2346 23C5 A....N5fF#. 

2B50 E3EB DFCl DAl 8 1AE3 E5C5 E322 EC40 CDAF ".§.. 



2B60 0F3E 20E1 CD2A 03CD 7E2B 2AA7 40CD 752B .>...*...+*.«..+ 

2B70 CDFE 2018 BE7E B7C8 CD2A 0323 1 8F7 E52A *.#...* 

2B80 A740 444D E116 FFI 8 0303 15C8 7EB7 2302 .@DM ft. 

2B90 C8F2 892B FEFB 2008 OBOB OBOB 1414 1414 .,. + 



2BA0 FE95 CC24 0BD6 7FE5 5F21 5016 7EB7 23F2 ...$ !P...^. 

23B0 AC2B 1D20 F7E6 7F02 0315 CADS 287E 23B7 . + (,#. 

2BC0 F2B7 2BE1 1 8C6 CDIO iBDl C5C5 CD2C 1B30 .. + ,.0 

2BD0 0554 5DE3 E5DF D24A 1E21 2919 CDA7 28C1 .T J. !)...(. 

2BE0 21E8 1AE3 EB2A F940 1A02 0313 DF20 F960 ! *.@ 

2BF0 6922 F940 C9CD 8402 CD37 23E5 CDl 3 2A3E .".@ 7# . . . *> 

2C00 D3CD 6402 CD61 021A CD64 022A A440 EB2A \*.§.* 

2C10 F940 1A13 CD64 02DF 20F8 CDF8 01E1 C9CD .@ 

2C20 9302 7ED6 B228 02AF 012F 23F5 2BD7 3E00 (.../S.+.>. 

2C30 2807 CD37 23CD 132A 1A6F F1B7 6722 2141 (..7#..* "!A 

2C40 CC4D 1B2A 2141 EB06 03CD 3502 D6D3 20F7 .M.*!A....5 

-. 2C50 10F7 CD35 021C 1D28 03BB 2037 2AA4 4006 5 . . . ( . . . 7 * . @ . 

' 2C60 03CD 3502 5F96 A220 2173 CD6C 197E B723 ..5. ! # 

» 2C70 20ED CD2C 0210 EA22 F940 2129 1 9CD A728 ...,...".(?!)...( 

\ 2C80 CDF8 012A A440 E5C3 E81A 21A5 2CCD A728 ...*.@ !.,..{ 

^ 2C90 C318 1A32 3E3C 0603 CD35 02B7 20F8 10F8 ...2X...5 

2CA0 CD96 0218 pr-l^i^t- 4/ ^ 4^Pf-(/ CD7F 0A7E C3F8 BAD 

2CB0 27CD 022B D5CF 2CCD 1C2B Dl 1 2 C9CD 3823 '..+..,,.+ 8# 

2CC0 CDF4 OACF 3BEB 2A21 4118 083A DE40 B728 .,..;,*! A. .:- @ . ( 

2CD0 OCDI EBE5 AF32 DE40 BAF5 D546 BOCA 4A1E 2.@...F..J. 

2CE0 234E 2366 6918 1C58 E50E 027E 23FE 25CA #N5 X #.%, 

2CF0 172E FE20 2003 OCIO F2E1 433E 25CD 492E -.C>%.I. 



TRS-80 DISASSEMBLED H/>J^DBOOK 



PAGE 5 2 



2D00 
2D10 
2D20 
2D30 
2D40 
2D50 
2D60 
2D70 
2D80 
2D90 
2DA0 
2DB0 
2DC0 
2DD0 
2DE0 
2DF0 
2E00 
2E10 
2E20 
2E30 
2E40 
2E50 
2E60 
2E70 
2E80 
2E90 
2EA0 
2EB0 
2EC0 
2ED0 
2EE0 
2EF0 
2F00 
2F10 
2F20 
2F30 
2F40 
2F50 
2F60 
2F7 
2F8 
2F90 
2FA0 
2FB0 
2FC0 
2FD0 
2FE0 
2FF0 
3000 



CD2A 

2EFE 

7E23 

14FE 

2007 

2847 

7AF6 

0C0 5 

5DFE 

D8D1 

1D78 

C604 

C5E5 

CDA7 

FE2C 

2366 

2ECD 

E1C3 

C5CD 

C5CD 

5CA 

03F1 

CD4F 

6069 

0F3E 

FFOC 

380E 

E521 

FEDD 

21CA 

7D2F 

2FFE 

11C0 

0323 

5FF1 

DCAl 

CD7 5 

2A0 3 

21CD 

0415 

B7CA 

201E 

D5E5 

F579 

0019 

7D2F 

CD7 5 

37 "^-3 

FFFF 



03AF 

2328 

FE2E 

2A20 

051C 

7E23 

4057 

2 82 5 

5 ECO 

D147 

B728 

8257 

4 378 

2 8E1 

C297 

6916 

2A03 

6921 

3723 

682A 

D3 2D 

C932 

1EC0 

2 32 3 

20CD 

7EB7 

FEOA 

992E 

CAEO 

F6 2F 

FE14 

28CA 

C1D1 

1520 

F5DC 

2F38 

2BCD 

7EB7 

2A03 

20F1 

7D2F 

3E08 

0D7E 

FEFF 

444D 

78B7 

2BCD 

rb^ 
FFFF 



5F57 

3 7 5 

2840 

C878 

FEAF 

FE2E 

18E6 

7E23 

BECO 

1423 

107E 

05E1 

81FE 

2BD7 

19D7 

005F 

EIFI 

0E0 1 

CDF4 

CD.AA 

CD2A 

9A4 

E1EB 

4E23 

2A03 

2320 

300A 

E315 

2FFE 

FE1C 

CA4A 

782F 

CDFE 

F5C9 

5F2F 

0223 

FE2 

2809 

C97E 

C'•^ 1 i^- 

FE08 

0504 

B7 3 7 

3803 

23CD 

C805 

FE2 



CD4 9 

CAFE 

FE2 5 

FE02 

C610 

2818 

7EFE 

FE23 

23BE 

CAEB 

D62D 

F128 

19D2 

3728 

CIEB 

1978 

C2CB 

3EF1 

0AC1 

282A 

0318 

2AEA 

22EC 

4523 

2AA7 

FAE1 

5F7A 

14C2 

F028 

CA4 

2 FEE 

FE1B 

20C3 

E521 

7EB7 

4 7E 

C1C3 

CD2A 

B7C8 



rV 



FFFF FFFF 



280A 
281F 
CA9 
F1 1 8 
5819 
2B3E 
C1D1 
c/p/ 



2E57 

2DFE 

28BD 

2 33 8 

231C 

FE23 

2 3 3E 

2 8F6 

C023 

D17A 

2806 

5 CCS 

4A1E 

0D3 2 

E1E5 

B7C2 

2CDC 

5CD 

C5E5 

2141 

F7F5 

40B4 

40EB 

C5CD 

4 3E 

4716 

0707 

BB2E 

4 1FE 

2 FEE 

13CA 

281C 

652E 

5F2F 

CA3E 

BB20 

7C2E 

03CD 

CDS 4 

16FF 

FEOD 

CD2A 

0823 

C490 

C1F1 

08CD 

7AA3 

FFFF 



7E2 3 

2B3E 

BE20 

037E 

8257 

28F0 

2E20 

D511 

BECO 

2B1C 

FEFE 

D5CD 

7AF6 

DE4 

F5D5 

32D 

FE2 

4 9 2E 

2A21 

F196 

7AB7 

A5 3C 

CD2C 

7E23 

OECD 

OOCD 

8207 

14FE 

3138 

2328 

652F 

FE18 

7EB7 

E337 

2FCD 

EB15 

7EB7 

A12F 

0377 

CDOA 

CAEO 

032B 

7E2B 

0C04 

77CD 

2A0 3 

3C2A 

mot 

FFFF 



FE21 
0828 
DOFE 
FE24 
1C0E 
FE2C 
9 0E 
972D 
2378 
E608 
2007 
3 72 3 
80CD 
FE3B 
7E90 
1806 
E3CD 
EIFI 
4141 
473E 
3E 2B 
EEC8 
1BD2 
E1E5 
2A03 
8403 
8357 
D8CA 
02D6 
3FFE 
FE15 
CA7 5 
C804 
F5CD 
2A0 3 
20E8 
C83E 
1520 
CD2A 
2FCD 
2 FEE 
0511 
7723 
C5EB 
2A03 
15 20 
A7 4 
OO 
FFFF 



CA14 

E72B 

2428 

3E20 

0005 

201A 

0123 

D5 54 

D604 

2015 

3E08 

D1C1 

BEOF 

2805 

234E 

CD4 9 

DD2 9 

28E9 

OEOO 

2004 

C42A 

1804 

D91E 

CD^-F 

E50E 

D630 

18EB 

D22F 

20FE 

19CA 

CAE3 

2FFE 

CD2A 

8403 

F1F5 

F1C9 

21 CD 

F33E 

0323 

8403 

1BC8 

7D2F 

18F3 

6F26 

23C3 

F3C9 

2BC8 

FFFF 



• I 

a 
XT • 



..# (7. ..-.+>. (.+ 

• r. .(§.%( ?( 

* i 8 S> 
#..V/ 

« •l~W» • • •TT'^» • • • »Tr 

( '3, ^ ^ ( « rri 

• « ^tJaTTtttf \ • • • • • 1. 

it ii 4 
Tr«.7f««tf«.. 

...G.# + 

« e «Wa « « \r"^o •« /Tr^ • 

. .C J 

. . ( . + . 7 ( . 2 . @ . ; ( . 

#N 

-. . .1 

* 1 

...!..>...!...(. 

«*/rr«a«*»* * JriJrk • ■ 

. . ff VN ttFtt. • . + • • • • 
■> * * fls * 

• »«*ir««* ^J • « o e a • vJ 

n w 

/ 

«/•• •v_/«Tr V* • •* 

• / a » 9 kJ / a* a » / o tto a 

* 
/ >/ * 

/Oa7i»so« • o a ««« 

( * / > 

* * 5 

> ( * + / 

• « eaOaaas oaAo eeCl 

. .Dm.x *.#. 

/ 4-y * 

+ <■* 04- 

1 ^ n 



a a s o a o 



TRS-80 DISASSEMBLED HANDBOOK 



PAGE 5 3 



500 CLS:CLEAR200 

510 CMD"T" 

520 PRINT 

530 ONERRORGOTO5 4 0' 

5 40 RESU>^5 5 

550 PRINT" W 4 U C H 
G R A M" 

560 PRINT 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 
PRINT" 

INPUT/v7\$ :CLS 
I F/^^A $= " HE " GOTO 1 5 5 
IFAJV$ = "UH"THENQB? = ' 
IF/v.^?- " DS " THEN7\.A$- ' 
IFA„A? = "SD"G0T01 500 
IFAJV$ = "HD"GOTO1550 
IF.AA.$ = "B"GOTO36 



N U f-1 B E R 



CONVERSION 



PRO 



570 

580 

590 

600 

610 

620 

630 

640 

650 

660 

670 

680 

690 

7 00 

710 

720 

7 30 

740 

750 

76 

7 70 

780 

790 

800 

$ (JJ 

(CC)+STR$ (3B) +ST 



ENTER 
ENTER 



D" 
B" 



DECIMAL TO BINARY 
BINARY TO DECIMAL 
HEXADECIMAL TO BINARY ENTER H 
DECIMAL TO HEXADECIM-AL ENTER 
HEXADECIMAL TO DECIRAL ENTER 
SPLIT DECIMAL TO DECIMAL ENTE 
DECIMAi TO SPLIT HEXADECIMAL 
SPLIT HEXADECIMAL TO DECIMAL 



DH" :QB?="DS" 



B" 

DH": 

HD" 

R SP" 

ENTER DS" 

ENTER SD 



810 
82 
830 
840 
85 
860 
870 
880 
890 
900 
910 
920 
930 
940 
950 
960 
970 
980 
990 
1000 



REM DECIMAL TO BINARY CONVERSION 

CLS: INPUT" DECIMAL NO . " ; X : IFX>6 5 5 35GOT07 30 

A=INT(X/2) :AA=X-2*A:B-INT(A/2) : EB=A-2* B : C=INT (B/: 

D=INT(C/2) :DD=C-2*D:E=INT(D/2) : EE=D-2* E : F=INT (E/; 

G-INT(F/2) :GG-F-2*G:H-INT(G/2) : HH=G-2 *H : I=INT (H/; 

J=INT(I/2) :JJ=I-2*J:K=INT(J/2) : KK= J-2*K : L=INT (K/: 

Mi=INT(L/2) : MM=L-2*M:N=INT(M/2) : NN-M-2 *N : O-INT (N/; 

PP=0-2*INT(0/2) 

Y?=STR$ (PP) +STR$ (00) +STR$ (m) +STR$ (hUA) +STRS (LL) +< 

) +STR? (II) +STR$ (HH)+STR$ (GG) 4-STR$ (FF)+STR$ (EE) +S' 

R$ (AAi) 

I FAA? = " SP " THENNO=NO+ 1 : QB$- " DS " : GOTO 12 
IF.A-A$-"DK"ANDQB$=""THENPRINT: PRINT" HEXADECIMAL 
IFQB$="DS"GOT01200 

PRINT" BINARY s " YS : INPUTR : G0T07 30 
REM BINARY TO DECIMAL CONVERSION 
CLS: INPUT" 16, 8 , OR 4 DIGIT BINARY NO.";AA 
CLS :PRINTA.A; "DIGIT BINARY NO. " ; : INPUTX? 
IFLEN (X?) <>A^AGOTO870 

F0RZ-1T0AA:X=VAL(MID$ (X?,Z,1) ) : IFZ= 1 THENA=X 
IFZ=2THENB=X 
IFZ=3THENC=X 
IFZ=4THEND=X 

IFAA-8GOTO9 7 0ELSEIFAA=16GOTO9 7 
NEXT 
Y=A*8+B*4+C*2+D* 1 



2) 


CC=B-2*C 


2) 


FF=E-2*F 


2) 


II=H-2*I 


2) 


LL=K-2*L 


2) 


00--=N-2*0 


STP$ (KK) +STR 


TR$ (DD) +STP$ 



:GOTO12 00 



PRINT" 

IFZ=5THENE=X 
IFZ=6THENF=X 
IFZ=7THENG=X 
IFZ=8THENH=X 



DECIMAL" Y : INPUTR : G0T08 7 
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1010 IFAA=16GOTO1050 

10 20 NEXT 

10 30 Y=A*12 8+B*6 4+C*3 2+D*16+E*8+F*4+G*2+H*1 

1040 PRINT" DECIMAL"Y:INPUTR:GOTO870 ^ 

1050 IFZ=9THENI=X , * 

1060 IFZ=10THENJ=X 

1070 IFZ=1 1TnENK=X 

1080 IFZ=12THENL=X 

109 IFZ = 1 3THENr:=X 

1100 IFZ=14THENN=X 

1110 IFZ=15THEN0=X 

1120 IFZ=16THENP=X 

1130 NEXT 

1140 Y=A*32 76 8+B*16 384+C*8192+D*4 09 6+E*20 48+F*10 24+G*512+H*2 56+I 

*128 + J*64+K*32 + L*16+M*8+N*4+0*24-P*1 

1150 PRINT: PRINT" DECI^LZvL" ; Y : INPUTR 

1160 IFAA$="SP"GOTO730 

1170 IFAA.$="B"GOTO870 

1180 IFAA$="HD"GOT01540 

1190 IFAA$="SD"GOTO1500 

1200 DII$=MID$ (Y?, 1 ,8) :GOSUB1250 

1210 DH$=MID? (Y?,9,8) :GOSUB1250 

1220 DH?=MID$(Y$,17,8) :GOSUB12 50 

12 30 DH$=MID$ {Y?,25,8) :GOSUB1250 

1240 PRINT" " ; :INPUTR:GOTO7 30 

1250 DH=VAL(DH$) : IFDH=OTHENDII$ = " " 

1260 IFDH=1THENDH$="1" 

1270 IFDH=10THENDH$="2" 

1280 IFDH=1 1TIIENDHS = "3" 

1290 IFDH=100THENDM$="4" 

1300 IFDH=101THENDH$="5" 

1310 IFDH=110THENDH$="6" 

1320 IFDH^I 1 1THENDHS="7" 

1330 IFDH=1000THENDH$="8" 

134 IFDH=100 1THENDH$="9" 

1350 IFDH=10 10THEN'DHS = "A" 

1360 IFDH=10 1 1THENDHS="B" 

1370 IFDH=1 100TirENDH? = "C" 

1380 IFDH=1 101THENDH?="D" 

1390 IFDH=1 1 10THENDH$="E" 

1400 IFDH=1 1 1 1THENDII? = "F" 

14 10 IFQB$="DS"THENQQ=QQ+1 

14 2 IFQQ= 1 THENRRS = DK$ : RETUPvN 

14 30 IFGQ=2TIiENSS? = DH?:R£TUPaN 

14 40 IFQQ=3THENTT$ = DH? :RETUPJ^ 

1450 IFQQ=4THENUUS=DH$ 

1460 IFQB$ = "DS"7^-^DA.hS="DK"THENPRINT:PRINT" SPLIT HEX \-TT?;UU$ 

;RR$;SS? :QQ=0: INPUTR : G0T07 30 

1470 IFQB?="DS"ANDAA$="SP"AI^DN0=1THENFF$ =TT$+UU$:QQ=0 :GOT0730 

14 80 IFQB$ = "DS"A:^}DAi\$="SP"?.:^DNO=2THENSS$ = TT?+UU$:X$ = SS? + FF$:NO-0 

:QQ=0: PRINT" HE:<.?\DECIMAJ. " ; X? : GOT0 1 5 6 

1490 PRINTDH?; :RETUR.N 

1500 'SPLIT HEX TO DECIMAL CONVERSION 

1510 CLS:INPUT"SPLIT HEX NO. ";SH$ 

1520 SI$=LEFT$ (SH5,2) : SJ$=RIGHT$ (SH? , 2) 
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1530 X$ = '"': 
1540 REM HE 
1550 CLS:X$ 
1560 IFLEN( 
1570 FOR XX 
1580 IFA$='' 
1590 IFA$=" 
1600 IFA?-" 
1610 IFA$ = '' 
1620 IFA$=" 
1630 IFA$=" 
1640 IFA?=" 
1650 IFA$ = '' 
1660 IFA$-'' 
1670 IFA$-" 
1680 IFA$=" 
1690 IFA$=" 
1700 IFA$='' 
1710 IFA$=" 
1720 IFA?-" 
1730 IFA$=" 
174 NN^NN+ 
1750 IFix'N=1 
4GOTO1790 
1760 BB?=A$ 
CC$=A$ 
DD$=A$ 
EE$=A$ 
X?=3B$ 
IFAA$= 
AA-16 : 
END 



X$=SJ$+SI$ :GOTO1560 

X TO DECIMAL AND HEX TO BINARY COIWERSION 

= "" :INPUT"HEXADECIMJ\L NO. " ; X$ 

X$)<>4GOTO1550 i 

=1T04:A$=MID$ (X$ ,XX,1) 

0''THENA$="0000" 

1 "THENA$ = ''0001 " 

2"THENA$ = ''0010'' 

3"THENA$="001 1" 

4"THENA$="0100" 

5"THENA$="0101" 

6"THENA$ = ''0 1 10" 

7"THENA$="011 1 " 



8"THENA$ = 
9"TnENA$ = 



1000" 
1001" 



1770 
1780 
1790 
1800 
1810 
1820 
1830 
1840 
1850 



A"THENA$=" 1010" 

B"THENA$='' 10 11" 

C"THENA$ = '' 1100" 

D"THENA$=" 1101 " 

E"THENA$=" 1110" 

F"THENA$='' 1111" 

1 

GOTO17 6 0ELSEIFNN=2GOTO17 70ELSEIFNN=3GOTO17 8 0ELSEIFNN= 

NEXTXX:GOT015 70 
NEXTXX:GOT015 70 
NEXTXX:GOT015 70 



+CC$4-DD$+EE$ :NN=0 
"HB"THENPRINTX$; " BINARY 
GOTO890 



INPUTR : CLS : GOT0 15 5 



NOTE: PROGR.AM UTILIZES 3919 BYTES OF MEM 
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00100 
00110 
00120 
00130 
00140 
00150 
00160 
00170 
00180 
00190 
00200 
00210 
00220 
00230 
00240 
00250 
00260 
00270 
00280 
00290 
00300 
00310 
00320 
00330 
00340 
00350 
00360 
00370 
00380 
00390 
00400 
00410 
00420 
00430 
00440 
00450 
00460 
00470 
00480 
00490 
00500 
00510 
00520 
00530 
00540 
00550 
00560 
570 
00580 
00590 
00600 
00610 
00620 
00630 
00640 
00650 
0'0660 
00670 
00680 
00690 



; SOURCE CODE PROGRAl-i TO PRINT" ALL ZEROS V/ITH A SLASH 
; WITH AUTO CARRIAGE RETURN @ 64 CHARACTERS \fflEN LLIST 



COUNT 
START 



FINIS 



ELFIN 



NOINC 



RESET 



GARRET 



TEST 



ZERO 



DELAY 
DELAY1 
DELAY 2 



ORG 

EQU 

DEnv 

PUSH 

PUSH 

PUSH 

PUSH 

LD 

CP 

JR 

LD 

CP 

JR 

LD 

INC 

LD 

LD 

CP 

CALL 

POP 

POP 

POP 

POP 

JP 

LD 

LD 

JR 

LD 

LD 

JR 

CALL 

LD 

LD 

JR 

LD 

BIT 

JR 

RET 

CALL 

LD 

LD 

CALL 

CALL 

LD 

LD 

LD 

LD 

DJNZ 

DEC 

JP 

RET 

ORG 

DEF^-/ 

ORG 

DEFB 

E>Jn 



= 32533 DECIH^X ORIGIN 
MEM LOCATION FOR CHAR. COUNTER 
ASSEMBLER SA^/ES 2 BYTES § 7F15H 
SAVE REGISTERS IN STACK MEMORY 



7F15H 

7F15H 

COUNT 

AF 

BC 

DE 

HL 

A,C ;NEXT CHARACTER TO PRINT IN C REG 

ODH ;IS IT A CARRIAGE RETURl-I? 

Z, NOINC ;EXIT V?/0 INCREMENTING COUNTER 

A, (COUl^T) ; COUNTER VALUE FROM MEM 

4 OH ;IS IT 6 4 DECIM7-lL = END OF LINE? 

Z, GARRET ;IF SO, GOTO CARR. RETURN 

A, (COUNT) ;IF RETUR!^ FM GARRET 



A 

(COUNT) 
A,C 
30H 

Z,ZERO 
HL 
DE 
BC 
AF 

05 8DH 
A,OOH 

(COUNT) 
ELFIN 
A,OOH ; 

(COUl^fT) ,A 
FINIS 
TEST 
A, ODH 

(37E8H) ,A 

RESET 

A, (37E8H) 



;ADD 



+1 CHARACTER ON LINE 

;NEW COUKIT NUMiBER TO MEM 
NEXT CHARACTER TO PRINT IN C REG 
30H=ASCII ZERO. IS IT A ZERO? 
IF SO, GOTO ZERO SUBROUTItffi 
RESTORE REGISTERS TO ORIG. CONDX 



A 

; QUICK 

;RESET 



GOTO ROM STD. PRINTER ROUTINE 
RESET CHARACTER COUNTER- 

;IN {•{EMORY 
DEPARTURE 
CHARACTER- 

; COUNTER IN MEMORY. 
ALL DONE 

TEST IF PRINTER READY? 
ODH = ASCII CARRIAGE RETURN 

;D0 CARRIAGE RETURN 
GOTO RESET CHARACTER COUNTER 

; PRINTER MEM LOCATION 



7, A ; PRINTER READY HANDSHAKE? 

NZ,TEST ;LOOP TILL HANDSHAKE - 

; RETURN TO LINE AFTER CALL 
TEST ;IS PRINTER READY? 

A,2FH ;2FH=ASCII SLASH 

(37ESH),A ;PRINT '/' SLASH 

TEST ;IS PRINTER READY? 

DELAY ;20 MILLISECOND DELAY 

A,OBH ;08H = ASCII BACKSPACE 

(37E8H) ,A ;D0 BACKSPACE 

C,OAH ; INITIALIZE DELAY- 

B,OH ; LOOPS TO ALLOW SELECTRIC- 

DELAY2 ; PRINT !!EAD TIME TO SETTLE DOWN- 
C ;FROM BACKSPACE VIBRATION AND- 

NZ, DELAY 1 ,'FOR TRACK TO LOCK. 

; RETURN TO LINE AFTER CALL DELAY. 
4 26H ;PUT ADDRESS OF START IN PRINTER- 

START ;DRIVER ADDRESS AT 4026H MEMORY. 

COUNT ; CHARACTER COUNTER l-fEM ADDRESS- 

OOH ; INITIALIZE AT ZERO. 

COUNT ; FIRST LINE OF SUBROUTINE 
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OBJECT CODE: LPRINT ALL ZEROS VHTH SLASH 



7F15 




00140 




ORG 


7F15H 


7F15 




00150 


COUI^T 


EQU 


7FT5H 


7F15 


15 7F 


00160 




DEFW 


COUNT 


7F17 


F5 


00170 


START 


PUSH 


AF 


7F1 8 


C5 . 


00180 




PUSH 


BC 


7Fi9 


D5 


00190 




PUSH 


DE 


7F1A 


E5 


00200 




PUSH 


HL 


7F1B 


79 


00210 




LD 


A,C 


7F1C 


FEOD 


00220 




CP 


ODH 


7F1E 


281B 


00230 




JR 


Z , NOINC 


7F20 


3A15 7F 


00240 




LD 


A, (COUNT) 


7F2 3 


FE40 


00250 




CP 


040H 


7F25 


2822 


26 0' 




JR 


Z , CARPET 


7F27 


3A157F 


00270 


FINIS 


LD 


A, (COU>^T) 


7F2A 


3C 


00280 




ir]C 


A 


7F2B 


32 157F 


00290 




LD 


(COUNT) ,A 


7F2E 


7 9 


00300 




LD 


A,C 


7F2F 


FE30 


310 




CP 


3 OH 


7F31 


CC5B7F 


00320 




CALL 


Z,-ZERO 


7F34 


El 


330 


ELFIN 


POP 


HL 


7F35 


Dl 


3 4 




POP 


DE 


7F36 


CI 


350 




POP 


BC 


7F37 


Fl 


00360 




POP 


AF 


7F38 


C38D05 


00370 




JP 


58DH 


7F3B 


3E00 


00380 


NOINC 


LD 


A,OOH 


7F3D 


32 157F 


00390 




LD 


(COUNT) ,A 


7F40 


18F2 


00400 




JR 


ELFIN 


7F42 


3E00 


00410 


RESET 


LD 


A,OOH 


7F44 


32157F 


00420 




LD 


(COUNT) ,A 


7F47 


18DE 


00430 




JR 


FINIS 


7F49 


CD537F 


00440 


CARRET 


CALL 


TEST 


7F4C 


3E0D 


00450 




LD 


A, ODH 


7F4E 


32E837 


00460 




LD 


(37E8H) ,A 


7F,51 


18EF 


00470 




JR 


pj:set 


7F5 3 


3AE837 


00480 


TEST 


LD 


A, (37E8H) 


7F56 


CB7F 


00490 




BIT 


7, A 


7F58 


20F9 


00500 




JR 


NZ ,TEST 


7F5A 


C9 


510 




RET 




7F5B 


CD5 3 7F 


5 2 


ZERO 


CALL 


TEST 


7F5E 


3E2F . 


00530 




LD 


A,2FH 


7F60 


32E837 


00540 




LO- 


(37E8H) ,A 


7F63 


CD5 3 7F 


00550 




CALE 


TEST 


7F66 


CD6E7F 


00560 




CAJl^L 


DELAY 


7F6 9 


3E0B 


5 7 




LD 


A,08H 


7F6B 


32E837 


00580 




LD 


(37E8H) ,A 


7F6E 


OEOA 


00590 


DELAY 


LD 


C,0AH 


7F7 


0600 


00600 


DELAY 1 


LD 


B,OH 


7F72 


10FE 


00610 


DELAY 2 


DJNZ 


DELAY2 


7F7 4 


OD 


00620 




DEC 


C 


7F7 5 


C2707F 


00630 




JP 


NZ,DELAY1 


7F78 


C9 


00640 




RET 




4026 




00650 




ORG 


4026H 


4026 


177F 


00660 




DEFW 


START 


7F15 




00670 




ORG 


COUNT 


7F15 


00 


00680 




DEFB 


OOH 


7F15 




6 9 




END 


COUNT 
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CHAPTER 9 
- SELF-TEST QUESTIONS - 

The . following pages of self-test questions cover a number of 
important points in the preceeding Chapters and "demonstration 
programs. If you understand the logic, program flow, and 
rationale of each Chapter/program's contents, you should have 
little difficulty in answering the questions. If a question's 
answer is not clear, re-read/study the appropriate Chapter 
and/or demonstration program till osmosis occurs, as in time 
it will indeed permeate. If all else fails, try putting this 
handbook under your pillow and sleeping on it. (Ed.) 

SELF-TEST QUESTIONS FOR CHAPTER 1 : 

1. VThat is meant by masking the most significant bit (MSB)?^ 



2. \'rh.at are t±ie decimal and hexadecimal locations in ROM for 
the Level II functions' NAMES? 

From / to / 



3, Vfhy are disk BASIC'S functions' names and coupling 
addresses in non-disk Level II BASIC ROM? 



4. How would you mask the MSB of any MEM location in a simple 
program written in BASIC?. 



5. How many MEM groups (seperate address segments) do the 
BASIC functions' CALL addresses occupy? Beginning locations? 

A. B, C. D. 



6. Name the 2 geniuses at Microsoft who wrote Level II and 
disk BASIC (luckily they did not write DOS 2.1 or 2,2), 



7, \Vhy are the BASIC functions' CALL addresses in Level II ROM 
expressed LSB first and MSB second? 



8, Wliat are the decimal values of PEEK 5666 & 5667? What 
Level II function's CALL address do they represent? 

A. / B. 



9, Wiat are the MEM locations in decimal and hex of the 
following PEEK values? A. 194-30 B. 15-42 C, 255-255 D, 0-255 

A»_.._ / B.__ / C. / D, / 
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SELF-TEST QUESTIONS - CKT^TER 2; 

1. On the average, how much faster will efficiently written ^ 
assembly language programs run than BASIC ? l-iEM required? 

A. B. 



'' 2. What do we call the 2 RA„M arithmetic storage locations? 
A. R. 



3. V,T-iat is the NT (number type) for the following numbers? 
A. 10000 ^ B. 33000 C, 1.011 D. 1.1111111 

4. Where is the NT (number type) stored in RAJ-1 memory? 



5. Vlhat type of numbers are represented by NT (number type) =? 
A. 2 B. 3 C. 4 D. 8 

6. In Figure 7, what is accomplished by line 310? 

7. In Figure 7, what is accomplished by line 320? 



In Figure 9, what is accomplished by lines 340/350? 



9. In Figure 11, what is accomplished by line 310? 



10. How many significant digits in a CDBL argument? 



I 



NOTES : 
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SELF-TEST QUESTIONS - CHM'TER 3: 

1. Does Level II 'ROM ever use the the Z-80 alternate register 
pairs AF' - BC - DE ' - HL' ? 



2. V.'here is the ROM CALL location to move "B" register bytes 
from MEM location XXXX to MEM location YYYY? 



3. How manv MEM locations in the ACCUM and CDBL store? V^ere' 



4. How is the NT (number type converted to ASCII? 



5. Vlhat CALL converts the ACCUM to an ASCII string? 



6. \^iat function does Figure 13 's line 420 perform? Why? 



7. VThat is the difference between RTVNDOM and R-ND? 



. What is the difference between CINT and INT? 



9. How is the conversion MEM. location CALLed in Figure 13? 



10. How is the RETUPJM MEM location CALLed in Figure 13? 



NOTE: Pages 17, 19, & 2 1 add a zero Operand AFTER DEFB 
See pages 18, 20, & 22 for correct placement. 
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SELF-TEST QUESTIONS - CHAPTER 4: 

1. V/hat is the value of PEEK (14464) if one shift key is 
pressesed? If both shift keys are pressed? 

i 



2. V,Tiat is the value of PEEK (14338) if H, I, J, K, L, M, N, 
and keys are pressed sinultaneous ly? 



3. IJhat is the major difference between CALL 002BH and 0049H? 



4. IJhat data is stored at M_EM location 409CH? 



5. VThat is the simplest way to store an integer and single 
precision number in RA_M (not counting the ACCUM & CDBL store) . 



6. Where are data corriparison results stored? \/hat values? 



7. V7hat is the value of the "A" register if C/^J.L 0994H is used 
and the ACCUM contains -1.999999 99 99? 



8. What CALL is used to change any value to an integer? To a 
single precision number? To a double precision number? 



9. VJYiat is the value of NT R.\jM storage for a string? 



10, Vlhat value v/ill MEM location 37E8H contain v/hen the line 
f printer is ready (handshake) ? VIYxat MEM location is loaded with 
j the NEXT character to be printed? 



11. Write a brief assembly language program to output to the 

video display a message of ANY length using the CALL 2 8A7H 

subroutine. 

NOTE: This subroutine will output a string of up to 63 

characters with non-disk Level II. By concatenating the 

strings with additional DEEM OPCODES, the message length is 

only limited by available memory. 



1 
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SELF-TEST QUESTIONS - CHT^TER 5 



Fill in decimal CALL locations for these Level II functions 
using Chapter 7's Multi-Base Conversion Program: « 



BASIC CALL 
FUNCTION ADDF 

ABS 


BASIC 
lESS FU~NCTION 

ASC 

AUTO 

CUR? 

CLEAR 

CLS 

COS 

CSNG 

DEFDBL 

DEFSNG 

DELETE 

EDIT 

END 

ERL 

EXP 

FOR 

GOSUB 

IF 

INP 

INSTR 

LEFT? 

LIST 

LLIST 

MEM 

NEVJ 

NOT 

OUT 

POINT 

POS 

RANDOM 

REM 

RESTORE 

RIGHT? 

RUN 

SGN 

SQR 

STR? 

SYSTEM 

TROFF 

USR 

VAL 


CALL 
ADDRESS 


ATN 




CDBL 




CI NT 




CLOAD 




CONT 




CSAVE 




DATA 




DEFINT 




DEFSTR 




DIM 




ELSE 




ERR 




ERROR 




FIX 




FRE 




GOTO 




INKEY$ 




INPUT 




INT 




LEN 




LOG 




LPRINT 




MID$ 




NEXT 




ON 




PEEK 




POKE 




PRINT 




READ 




RESET 




RESUME 




RND 




SET 




SIN 




STOP 




STRING? 




TAN 




TRON 




VARPTR 





I 
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SELF-TEST QUESTIONS - CHaj>TERS 6, 7 & 8: 

1. A. Each KiEM location on page 37 holds how many hex bytes? 
B. Each Line? C. Total page? 



2. A. On page 37, location 1 1 FH contain hex? B. = ASCII? 



V 



3. On page 37, just above line 0000, fill-in LSB of each 
hexadecimal memory location, zero through F. 



4. A. In Chapter 7's "Number Conversion Program," is line 510 
only for disk BASIC? B. Should it be deleted for non-disk? 



5. How many fundamental number conversions are performed by 
Chapter 7's "Nujnber Conversion Program"? 



How 



is the "SPLIT DECIMAi TO DECIMAL" conversion performied? 



7. In Chapter B's program, rewrite lines 170-200 and 330-360 
to use EX AF,AF' & EXX OPCODES instead of the stack- for 
storage. Be \rERY careful. 



8. A. In line 490, rewrite this line to use the CP (compare) 
OPCODE instead of BIT 7, A. B. V/hat is the difference? 



9. Wiy are lines 590-630 necessary with IBM Slectric printers? 



10. If you had a line printer with 130 characters per line 
capability (most IBM Selectric Printer Terminals have it) how 
would you modify this program to use all 130 positions? 
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CHAPTER 10 
- BIBLIOGRAPHY A,ND ANSWERS TO SELF-TEST QUESTIONS - 



BIBLIOGRAPHY and BOOKS AVAILABLE: 

Using the consumers' scale of: BEST buy, GOOD buy, FAIR buy, 
POOR buy, and utterly V7RETCHED, there is nothing on the market 
today for the TRS-8 assembly programmer that rates much 
higher than FAIR in this reviewers opinion, with two 
exceptions. They are both for the advanced assembly language 
programmer and are: 

BEST: Andrew Hildebrand's "Software Technical Manual", @ $40. 
Houston Micro Computer Technologies 
5313 Bissonnet Street 
Bellaire, Texas 77401 



GOOD: Lance Leventhal's "Z-80 Assembly Language Pgmg" , @ $15. 
Adam Osborne & Associates 
630 Bancroft Way 
Berkeley, California 94710 



Both of the above books assume that the reader has at least a 
few years of experience of 8080A assembly language programming 
experience before jumping into the Z-80, in our opinion. 

There is really nothing truly worthwhile available for the 
beginning assembly language programmer. This includes Radio 
Shack's "TRS-80 Assembly language Programming," at $3.95. Even 
at $3.95 it is grossly OVER-PRICED and in our kindest moments 
deserves our WRETCHED rating. Since there is nothing else for 
the beginner but garbage, garbage is the only ENTRE available 
and if one is truly hungry enough and holds one's jaose, 
garbage is better than starving to death. 

The following books have received our FAIR consumers' rating 
because of considerable generosity on our reviewer's part. 

FAIR: "Z-80 Programming For Logic Design" 
great for typev/riter mechanics 

FAIR: "The Z-80 Microcomputer Handl:iook" 

the cover should be a clue to the buyer 

FAIR: ''Z-80 Software Gourmet Guide & Cookbook" 
cooked tripe is still tripe 



\<rnat the 200,000+ TRS-80 owners above the 5th grade level are 
awaiting is W60VP ' s new book on the subject of assembly 
language programming, V760VP is Dr. David Lien, Dean of San 
Diego University, a professional educator of the first water. 
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Dave Lien wrote the "User's Manual for Level 1," which is 
certainly the finest tutorial for beginning BASIC prog raj;uners 
from age 12 to 80 ever published, and followed it up fall '79 
with "Learning Level II," which also deserves, an excellent 
rating. If and when Dave publishes tutorials on disk BASIC 
and assembly language procranming , they will indeed be on the 
best-seller list. 



V - ANS\vERS TO QUESTIONS ON CHA_PTER3' 1 TO 8 - 

NOTE: 

Advanced assembly language prograiruriers ' will undoubtedly think 
maiiy of the questions naive to the point of ridiculousness. 
Indeed, many questions are absurdly simple to DRI\^ HO>!E 
points to those readers who may NOT be as advanced as others. 
It is a difficult balancing act, so we ask for your patience 
and understanding. 

ANSWERS TO CHAPTER 1 : 

1. Assume that PEEK (571 2) = 197 decimal. 5712 is MEM location 
1650H. Now, 197 decimal = 11000101 binary. The left most bit 
is a 1 which is masked (eliminated). It now = 1000101 binary 
= 69 decimal = ASCII "E". Since 10000000 binary = 128 decimal 

_this same bit may be masked by simply sv±)tracting 128 from the 
'peek decimal value. 

2. From 5712 decimal/1 650H to 6 172 decJ mal/ 1 8 ICH. 

3. They are all CALLed by non-disk Level II ROM. If no disk 
is present or operating = L3/ERR0R. 

4. Subtract 128 from the PEEK value. 

5. Two. 

6. From 6178 decimal/1 822H to 6297 decimal/1 89 9H , and 
from 5642 decimal/1 6 OAH to 5711 decimal/1 6 4FH . 

J 7. Convenience + allowing modest upward compatability between 

the earlier 8080 microprocessor and the newer Z-80, both 

'invented/designed by Dr. Federico Faggin (President of Zilog). 

8. 189 and 21 decimal. 

9. ATN = arc tangent with output value in radians. 

10. A. 7874 decimal/lEC2H B, 10767 decimal/2A0FH 
C. 65535 decimal/FFFFH D. . 65280 decimal/FFO OH 
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ANSWERS TO QUESTIONS ON CHAPTER 2: 

1. A. 300 to 350+ times faster. B. 1/10th as inuch memory. 

2. ACCOM and CDBL Store; {"CS" abbreviation). 

3. A. = 2 B. = 4 ( >32767 ) C. = 4 D. = 8 NOTE: 3 = string 

4. NT MEM location at 40AFH. 

5. A, 2 = integer B. 4 = single precision C. 8 = double prec. 

6. CALL 0E6CH changes an arithmetic string to minumum NT and 
stores it in the ACCOM in the appropriate format, plus storing 
the NT in MEM location 4 OAFH . 

7. CALL 0A7FH = CINT which changes ANY number in the range of 
+32767 to -32768 to an integer. 

8. Uses stack MEM in RAM to store the single precision value 
of registers BCDE while BCDE are used in following C^^iLs . 

9. See answer to question 6, above. CALL 0E65H is similar, 
but stores the number in the ACCOM in double precision format 
and sets the NT in MEM location 4 OAFH to 8. 

10. THIS MAY SURPRISE YOU. Answer: only as many digits as 
contained in the argument. Up to 17 digits maximum. If the 
argument contains 10 significant digits, the last 7 digits 
will be meaningless. See Radio Shack's "Microcomputer News- 
Letter," October '79, page 2 for an excellent explanation, 

ANSV7ERS TO QUESTIONS ON CHAI^TER 3: 

1. NO, they are never used in Level II ROM as this Microsoft 
B/vSIC is sort of the son of an earlier 8080 BASIC and the' 8080 
has neither OPCODE. This allows YOU to use it whenever 
desired and save 4+ bytes compared with PUSH and POP. 

2. CALL 09D7H/2519 decimal. 

3. Eight in each one. 

4. ADD A, 48 ;converts to ASCII. 

5. CALL OFBDH converts ACCUM to a string (address in HL) , and 
NT in MEM location 4 OAFH = 3. 

6. A. Converts any number in CINT range in ACCUM to integer. 
B. All ROM CALL locations are integers, so acts as a trap 

for erroneous input. 
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ANSWERS TO QUESTIONS ON CHAPTER 3 - CONTI^ 



NUED 



lltT'^T '^"o"'''"'^^^^^''^ ^^^ '"^° ^^"^°"^ "^^^^ generator. RlW 
between 1 and f-hl .^"^'^^er, generates a pseudo-random number 
Detueen 1 and the integer value m the ACCW4. RND with NT = 4 

precision numh^r'n'r "^'^"^' S^^^^^^es a pseudorandom single 

which must r^r<ir'^" '"^'^ ^"^ "'^^ """''"^^^ '^ '^^ ^^^™ 

n^m^er ''^''''rTST^ ''k'^'^ '''^''^'^ ^"° ^^^^"^^ P°i"ts) for ANY 

.^ number. CINT changes any nuniber with up to 7 digits to an 

integer withm the range of +32767 and -32768. ^^^'^^^ t° ^ 

n^ber"of-'?h?.?'T^i;' ^ ^"^^ "^^^^ effectively POPs the top 
number of. the stack, thus CALLing the CONV MEM location. 

l^'- ^iT'^, ^""^^ listed CONVersion subroutine ends with a RET 
the RETUof ',3 '°' the top_nu.mber off of the stack, which is 
the REiUP.N dddress. This is a very useful ploy at times. 

•ANSl/ERS TO QUESTIONS ON CH/J>TER 4 : 

""• -^' ^ ^- ■" 2. 255 decimal 

k;yb'oard°°ti?i'''Mo? ^""^ ''ir''??^^ °''''^- CALL0049H scans the 
t^'eT^t as\\NKEYTirB?slc:'' ^^" '^^' '' '^'^'''^ ' ^^^^^^^ 

t;^vf '7 l°^^tion 409CH stores "output" directions for CALL 
1BB3H amongst others). Initialized at Zero = video display^ 
+ 1 - line printe, and -1 = cassette. ^' 

5 A, PUSH DE or PUSH HL B. PUSH BC and PUSH DE C. Move 8 
bytes from ACCUM to MEM via CALL 09D6H or 09D7H (A OR B reg) . 

6. A. In the "A" register. B. Zero C. +1 D. 255 (OFFH) 

7. 255 decimal - 11111111 binary - OFFH hex 

="CDBL^ 0'^lH/2737 decimal = CSNG C. CALL OADBH/2779 decimal 
9. 3 decimal 
/TO. A. 63 decimal = ASCII ? (what next?). b. 37E8H 

11. W4UCH EQU 7D00H ;MESSAGE PROGR.AM 

ORG W4UCH ,-7D00H = 32000 DECIM^ 
^O HL, STRING ; STRING M^M ADDRESS 

arj^^j^r nPPM ^^^^" ; DISPLAY $ SUBROUTIl^ 

STRING DEFM 'USING LEVEL II ROM SUBROUTINES' 

°r;™ ° '-END OF MESSAGE DELIMITER 

.„n^P ^° "'^"^« ; CONCATENATE A.NY LENGTH 
;NOTE-you m:ay concatenate up to 240 bytes per CALL 28A7H 
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ANSWERS TO SELF-TEST QUESTIONS 

- CHAPTER 5 - ^ 

LEVEL II BASIC FUNCTION CALL ADDRESSES IN DECllAKL 



BASIC 


CALL 


BASIC 


CALL 


FUNCTION 


addpj:ss 


FUNCTION 


ADDRESS 


ABS 


2423 


ASC 


10767 


ATN 


5565 


AUTO 


8200 


CDBL 


2779 


cnR$ 


10783 


CI NT 


2687 


CLEAR 


7802 


CLOAD 


11295 


CLS 


457 


CONT 


7652 


COS 


5441 


CSAVE 


11253 


CSNG 


2737 


DATA 


7941 


defdbl 


7689 


DEFINT 


7683 


defsng 


7686 


DEFSTR 


7680 


DELETE 


11206 


DIM 


9736 


EDIT 


11872 


ELSE 


7943 


END 


7598 


ERL 


9437 


ERR 


9423 


ERROR 


8180 


EXP 


5177 


FIX 


2854 


FOR 


7329 


FRE 


10196 


GOSUB 


7857 


GOTO 


7874 


IF 


8249 


INKEY? 


413 


INP 


10991 


INPUT 


8602 


INSTR 


16787 


INT 


2871 


LEFT? 


10849 


LEN 


10755 


LIST 


11054 


LOG 


2057 


LLIST 


11049 


LPRINT 


8295 


MEM 


10185 


MID$ 


10906 


NEW 


6985 


NEXT 


8886 


NOT 


9668 


ON 


8044 


OUT 


11003 


PEEK 


11434 


POINT 


307 


POKE 


11441 


POS 


10229 


PRINT 


8303 


RANDOM 


467 


READ 


8687 


REM 


7943 


RESET 


312 


RESTORE 


7569 


RESUME 


8111 


RIGHT? 


10897 


RND 


5321 


RUN 


7843 


SET 


309 


SGN 


2442 


SIN 


54 4 7 


SQR 


5095 


STOP 


7593 


STR? 


10294 


STRING? 


10799 


SYSTEM 


690 


TAl-^ 


5544 


TROFF 


7672 


TRON 


7671 


USR 


10238 


VARPTR 


9461 


VAL 


10949 
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ANSWERS TO SELF-TEST QUESTIONS CH.APTERS 6, 7, 8: 

"" • ^' °"^ ^' ^6 bytes per line C. 48 lines X 16/line = 76 

2. A. 56H = 86 decimal " b. = ASCII "V" i 



3. 12 3 
00 F3AF C3 7 4 



^^5 6 7 8 9 A B CD E F 1 234 56789ABCDEF 
06C3 0040 C300 40E1 E9C3 9F06 @..@ 



4 
5 



A. YES: to speed-up disk a bit B. YES: remove from non-disk 

A. To round-off division by 2 to an integer = a short-cut 
in tne decimal to binary conversion equation. 



B 



4 fundamental conversions - 
decimal to binary 
binary to decimal 
binary to hexadecimal 
hexadecimal to binary 



rest are only massages. 

lines 740 - 840 

lines 860 - 1150 

lines 1200 - 1490 

lines 15 50 - 1810 



FFS Tn Wr^l^Ail ll "''''^^^ "' converted to hex and stored in 
tn hL J J • /^^ ^^^°"^ decimal number is then converted 
to hex and stored m SS? in line 1480. FF? and SS$ are then 

llTl i^A ""^\= 'S-'^ '" ^^"^ ''^'' ^^^ correct heSnu^S:? 
nnihpr- y. ^^-^^K " displayed on video in line 1480. This hex 
de^^^;; ' \^ X^"" converted to binary, and next converted to 

writtji'ln^RAqir . fP^f^K^ °^ ^"^^°- ^^^^^^ ^^^^ SLOW when 
written m BASIC, it still beats a Hewlett-Packard calculator. 



00170 START 
00180 
00190 
delete lines 



EX 
LD 
EXX 
00200 



AF , AF ' 
A,C 

and 0210 



; EXCHANGE ALTERl^ATE REGS. 
;NEXT CHAR. TO "A" REGISTER 
;EXCH.ANGE BC DE HL AiT. REG 



to be printed is in the "C 



NOTE: Since the NEXT character 

00330 pf?Tr^''^v"^ ■'"^'^ ^°^^ ^^ ^"^° "A"'BEmS^ exchange": 

0034^ II. '''^''''" 'EXCH.A.NGE ALTERNATE REGS. 

^ T ^ . . ^^ ;EXCHA.NGE BD DE HL ALT REG 

delete lines 00350 and 00360 nu kui . reg 

NOTE: This little exercise deleted 4 lines and 4+ bytes 
A very decided improvement & good technique. 



8. 00490 



CP 



3FH 



is it ASCII ? = 63 decimal 



9. Backspace vibrates most IBM Selectric printers Quite 
lllllf^r:,, ^"^ ''°"" ^"'^^'"^ "^'^°^^ ^^-^ 1--- Usronir if 

10. Change line 250 to read: 

°°^^° ^P 082H ;is it 130 decimal = end of line? 
FINAI. REQUEST: 

Please send AliY errors you find to: 

RICHCRAFT ENGINEERING LTD 
DRAWER 10 65 
CHAUTAUQUA, NY 14 722 
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Hi 

III 



41 
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I 1 i 



I I 



3 o " a. 



11 



ill 
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B B 



2| 

E * 

p ^ 

^ i 



ll 



si 

6 3 

be □ 



§|B.& 
■e -E « ^ B 

IllH 



11 



G E 



irs 
o s. 



?4 
II 



a 






@ B 



S 51 S 



□ 

B 
13 B 



cn 

a 
S 

e 

o 
U 



2 t 
o a 



I I 



^ 1 



11 « o 



B B H S B B 
B B (3 l3j H S 



i 



31 



B 

B B 



3 

2 JK 






^-1 

111 
ill 

ill 

III 
III 



